fgcr has asked for the wisdom of the Perl Monks concerning the following question:

while (<FHIN>) { ## takes each line and sends it through $line=$_; ## remove the new line chomp(); ## we have to convert the line into an array to change ## the timestamp to local time ## so using the split command it splits the line by the ## commas (,) and assigns it the variable $line @line = split(/,/ ,$line); ## takes the first value of the array $line, which is $line[0] and we are going to convert the time stamp ## using the localtime function print @line[0]; ## declare the variable $t= @line[0]; print "this is what t is now $t\n"; ## assign the format ($s,$m,$h,$md,$mon,$year) = localtime($t); ## increment mon by one because in unix time months start from 0-11 not 1-12 $mon++; ## add 1900 to the year because unix time starts the year 2000 at 100 ## took the format and put it into a readable and useable format $firstnum = "$mon/$md/$year $h:$m:$s"; my $firstnumtest = "$mon$md$year";

Originally posted as a Categorized Question.