Mazhar schreef:
> I tried with your input above but i still get one character at the
> beginning missing..
As said, it is probably not missing, but just overwritten on your
screen,
by the space in your print.
#!/usr/bin/perl
use strict ;
use warnings ;
my $fn = $ARGV[0] ;
open my $fh, '<', $fn
or die "open '$fn': stopped $!" ;
while ( <$fh> )
{
chomp ;
print "[$.>\n{$_}\n<$.]\n" ;
}
close $fh
or die "close '$fn': stopped $!" ;
--
Affijn, Ruud
"Gewoon is een tijger."
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
