#!/usr/bin/perl $date = `date`; print $date;