#!/usr/bin/perl
use strict;
use CGI;
my $query = new CGI; 
my $filter = "*.pl *.txt";
print "Content-type: text/plain"; 
my $lsoutput = `ls -lt $filter`;
print "\n$lsoutput";