Re: regex question matching dates

John W. Krahn wrote:
> Richard Lee wrote:
>> 
>>      @array = qx#ls -tr $directory/$ARGV[0]*#;
> 
> Why not do that directly in perl:
> 
>      @array = map $_->[0], sort { $a->[1] <=> $b->[1] } map [ $_, -M ], 
> glob "$directory/$ARGV[0]*";

Sorry, that should be:

      @array = map $_->[0], sort { $b->[1] <=> $a->[1] } map [ $_, -M ], 
glob "$directory/$ARGV[0]*";



John
-- 
Perl isn't a toolbox, but a small machine shop where you
can special-order certain sorts of tools at low cost and
in short order.                            -- Larry Wall