#(UNIX) $ date | perl -ne 'print "Today is $_";' Today is Mon Mar 12 20:01:58 PDT 2007 #(Windows) $ date /T | perl -ne "print qq/Today is $_/;" Today is Tue 04/24/2007