in reply to Shell usable?

Hi !

I believe you are doing a bit too much here, this should work:
#!/usr/bin/perl -w use strict; use Shell qw( ls touch ); touch( "dummy" ); ls( "dummy" );

---- kurt

Replies are listed 'Best First'.
Re: Re: Shell usable?
by axelrose (Scribe) on Jul 02, 2002 at 15:57 UTC
    sorry, I misunderstood you saying "doing too much"
    I tried again not using OO style
    #!/usr/bin/perl -w use strict; use Shell qw( ls touch ); touch( "dummy" ) or die "touch: $!"; ls( "dummy" ) or die "first ls: $!"; ls( "dummy" ) or die "second ls: $!";
    and get different error messages:
    $ rm dummy $ perl shell-test.pl touch: Illegal seek at shell-test.pl line 6. $ touch dummy $ perl shell-test.pl touch: Illegal seek at shell-test.pl line 6.
Re: Re: Shell usable?
by axelrose (Scribe) on Jul 02, 2002 at 15:42 UTC
    You're right. This is a silly example but imagine some intermedia processing with the dummy file ... the error pops up the second time I use the $sh->ls.