Joshua Colson wrote:
> On Fri, 2006-05-26 at 09:45 +1000, Keenan, Greg John (Greg)** CTR **
> wrote:
>>
>>my $cfg;
>>foreach $cfg (@cfgs) {
>> my $fileIn="$cfgDir/$cfg/tapelist";
>> open (FILEIN, "<$fileIn") or die ("Could not open $fileIn: $!");
>> my @lines = reverse <FILEIN>;
>> my $line;
>># foreach $line (@lines) {
>># print "$line\n";
>># }
> print (@lines)[0 .. $numTapes{"$cfg"}];
That will produce a syntax error. You have the print(@lines) function
followed by an anonymous array.
John
--
use Perl;
program
fulfillment
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
