#GMT time,date
my($Gyr,$Gm,$Gd,$Gh,$Gm,$offset)=(2006,1,8,1,34,-5);

#subroutine converts to local time, date
#from GMT w/ specified offset 
#where convertTZ is "hypothetical subroutine
my($y,$m,$d,$h,$m)=&convertTZ($Gyr,$Gm,$Gd,$Gh,$Gm,$offset);