Hello,
2007/4/9, Rodrigo Tavares <[EMAIL PROTECTED]>:
Hello,
I put in my code:
if i put in code : my @ARGV = ('a');
Come the message:
You shouldn't use 'my' to declare the @ARGV since @ARGV is a special package
variable in Perl.Instead you can access this array directly,don't need the
declaring.
If you really need to change @ARGV casually,using 'local' in a block:
{
local @ARGV = (1,2,3);
}
sh: -c: line 0: unexpected EOF while looking for
matching `''
sh: -c: line 1: syntax error: unexpected end of fil
Have you added the '#/usr/bin/perl' at the first line of the script?
if ($ARGV[0] eq 'stop')
{
print "Stopping PostgreSQL:\n";
unless (fork)
{
for (my $i = 0; $i < @banks; $i++)
{
print "Hello World !"
}
} # fecha fork
}
The codes above seem no problem.
But you need to declare @banks at first otherwise you'll get compile errors
when 'use strict' was enabled.
--
mailto: [EMAIL PROTECTED]
http://home.arcor.de/jeffpang/
