($tyear, $tmon, $tday) = unpack("a4a2a2", $today); [download]
Paul
In reply to Re: splitting a string into arbitrary lengths by rev_1318 in thread splitting a string into arbitrary lengths by ryanc