[Omaha.pm] find "000" in position 70-72 in text files

[Jay Hannah]

On Apr 9, 2007, at 1:39 PM, Andy Lester wrote:
> Jay, please start usin' the lexical handles!  So you can say
>
> 	open( my $IN, $file ) or die "Can't open $file: $!\n";
>
> Using the old-style handles is dangerous.

-ponder-   I've always used

    open(IN, $file)

or gone full OO w/

    use FileHandle;
    my $fh = FileHandle->new;

I'm not hep to your voodoo. "perldoc -f open" still seems to use my  
"old-style" too. I must be old if my Perl 5 methods are outdated  
before Perl 5 is.  :)

> You can also shorten it reaaaally short like so:
>
> 	$ perl -lne'print "$ARGV: $_" if /^.{69}000/' *dly

Ah, $ARGV is very cool! I knew the rest of that but hadn't learned  
$ARGV. Thanks!

j