my ($day,$month,$year) = split("/",$date); [download]
In reply to Re: perl one liner by irah in thread perl one liner by selva