Hi,
I am doing this simple enough script, but somehow it
generates error:
open COO, "1898.inf" or die "Cannot open file 1898.inf:$!";
@shrimp=<COO>;
foreach @shrimp{
$squid=substr($_,0,4);
$shark=$_.".pdb";
system "\rm dali.lock"; #ignore this part
system "dalilite ~readbrk pdb1898/$shark $squid"; #ignore this part
}
Global symbol "@shrimp" requires explicit package name at ./pdbReadbrk2000.pl
line 19.
syntax error at ./pdbReadbrk2000.pl line 21, near "foreach @shrimp"
Global symbol "$to" requires explicit package name at ./pdbReadbrk2000.pl line
21.
thank you all, what did I do wrong?
best,
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
