hi;
i am trying to take input from multiple files....
Various I/P files are specified at command line...
Can anyone tell me how to pass the file name to a
routine that opens it for parsing ....
the same function is to be called for all the I/P
files...
Code is:
foreach my $file (@ARGV)
{
#my $file= shift @ARGV;
#print "$file\n";
#
&pass1($file);
&display();
print " \n ****8next******\n";
}
and the function to be called is
sub pass1
{
my ($file)[EMAIL PROTECTED];
print "$file";
#MIBFH++;
open(MIBFH,$file)|| die "Error opening the $file
$!\n";
while(my $line = <MIBFH> )
{
....
}
close(MIBFH);
}
Can anyone help me...!
Regs
urvashi
__________________________________
Do you Yahoo!?
Yahoo! Finance Tax Center - File online. File on time.
http://taxes.yahoo.com/filing.html
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
