|
Posted by Ben Morrow on May 13, 2008, 6:53 pm
Please log in for more thread options
> Ben Morrow wrote:
> >
> > while (my $line = <$INPUT>) {
<snip>
> > my %record;
> > @record = split / /, $line;
> >
> > $record == 226
> > and $record == 0
> > and $record eq '-'
>
> Because you are using "split / /, $line" $record will probably
> contain "-\n" instead of '-'.
Good point. I'm too used to -l :)
Ben
--
"Faith has you at a disadvantage, Buffy."
"'Cause I'm not crazy, or 'cause I don't kill people?"
"Both, actually."
[ben@morrow.me.uk]
| 
XML Sitemap