> Can we actually loop over the 'while diamond'? > Please kindly advice how can I overcome this problem.
I don't know if I'm skilled enough to answer this yet, but shouldn't you be using: my @myarray = <FILE>; foreach (@myarray) { do stuff } > Thanks so much for your time. > > Regards, > Edward WIJAYA > SINGAPORE > > > __BEGIN__ > use strict; > use warnings; > use Getopt::Std; > > our $opt_f; > getopts('f:'); > > open INFILE, "<$opt_f" or die "$0: Can't open file $opt_f: $!"; > > my $trial = 2; > > #What's wrong with running a for loop over the 'while' here? > for ( my $t = 1 ; $t <= $trial ; $t++ ) { > print "Trial ", $t, "\n"; > > while (<INFILE>) { > print; > } > } > > __END__ > > -- > To unsubscribe, e-mail: [EMAIL PROTECTED] > For additional commands, e-mail: [EMAIL PROTECTED] > <http://learn.perl.org/> <http://learn.perl.org/first-response> > > > -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>