#!/usr/bin/perl
#
###################################################################
#
# Description: This just outputs the date in the format that
#              UserLand uses for OPML files...
#
#     Example: Tue, 04 Jun 2002 16:23:33 GMT
#
####################################################################

use POSIX qw(strftime);


$date = strftime("%a, %d %b %Y %T GMT", gmtime);

print "$date\n";




__END__