#!/usr/local/bin/perl5.00506
use CGI;
$query = new CGI;
$query_string = $query->param('DIR');
print "Content-type: text/plain", "\n\
print `ls -lt $query_string`;