in reply to sort file list
Or do you have a list of files that you want to get additional information for in alphabetical order:#!/usr/bin/perl use strict; use warnings; my %file; while ( <DATA> ) { chomp; my @info = split " "; $file{ $info[3] } = $_; } print "$file{$_}\n" for sort keys %file; __DATA__ 1999-12-07 12:00p 3,856 abc.dll 2002-02-24 09:30p 260,096 xyz.dll 2004-03-19 01:29p 992,907 lmo.dll 2004-04-08 03:23p 24,576 efg.dll 2004-03-11 08:04a 1,036,288 stu.dll
See perldoc -f stat for more information if this is what you were after.#!/usr/bin/perl use strict; use warnings; for ( sort glob "*.dll" ) { print "$_ : ", -s, "\n"; }
Cheers - L~R
|
|---|