[EMAIL PROTECTED] wrote:
no.... thanks! but why are you setting ejectapes as an array and then calling it with @ instead of $?
my @ejectapes = qw(/usr/local/bin/perld/exports); ($^I, @ARGV) = ('.bak', @ejectapes);
instead of
my @ejectapes = qw(/usr/local/bin/perld/exports); ($^I, @ARGV) = ('.bak', $ejectapes);
because :
0) @ejectapes is not the same as $ejectapes :)
1) =qw() is an array
2) you're assigning it to @ARGV which is also an array, so array need to be used instead of variables, if you did it the scalar way and aded something to qw() like my @ejectapes = qw(/usr/local/bin/perld/exports /foobar/tapes /baz/wal/tapes);
It would only loop throught the first one since that's the only one you're using :)
HTH
Lee.M - JupiterHost.Net
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
