C:>perl -e "$t=localtime;print $t"
Mon Jan  5 00:50:20 2004
C:>set tz
TZ=MST

C:>time
The current time is: 17:50:30.95
Enter the new time: