Thursday 9 September 2010

Perl : One liner to find files less than an hour old in a dir

 perl -e 'for ( glob "./*" ) { system "ls -l $_"  if ( -M $_ <= (1/24) ) };'

0 comments: