#!/usr/bin/perl


# $Revision: 1.1.1.1 $ 
# $Date: 2007/02/08 21:05:39 $ 
# $Author: kwagner $ 
# $Source: /cvsroot/nitrcint/NITRCSRC/gforge/plugins/tinderbox/src/clientbin/show_time,v $ 
# $Name: v2_1_9-4 $ 

$t=time();

$out= (
       "The current time on ".`hostname`. "\n".
       "UnixTime: ".$t."\n".
       "LocalTime: ".localtime($t)."\n".
       "GMTime: ".gmtime($t)."\n".
       "\n"
	       );

print $out;
