On Sun, May 14, 2000 at 06:55:22AM -0700, Michael Lee <[EMAIL PROTECTED]> wrote:
> I've been trying to get the following script to work...
Try to rwrite it using the newer network-api (i.e. like this):
use Gimp;
use Term::ReadLine;
Gimp::init;
sub net
{
$term = new Term::ReadLine;
while( defined ($_ = $term->readline("Gimp> ")))
{
$res = eval($_) . "\n";
print("Error: $@"), next if $@;
print "\n";
}
}
> What might be wrong?
gimp-perl, but the "fix" would hit a bug in older (yet supported) perl
versions. the api above is much easier, though ;)
--
-----==- |
----==-- _ |
---==---(_)__ __ ____ __ Marc Lehmann +--
--==---/ / _ \/ // /\ \/ / [EMAIL PROTECTED] |e|
-=====/_/_//_/\_,_/ /_/\_\ XX11-RIPE --+
The choice of a GNU generation |
|