#!/usr/bin/perl use Date::Manip; while (<>) { chomp; print UnixDate($_, "%s")."\n"; }