Bill Akins SSS III Emory Healthcare (404) 712-2879 - Office 12674 - PIC [EMAIL PROTECTED]>>> "[EMAIL PROTECTED]" 10/10/03 08:57AM >>> >Hi,
>i search hiw can i work on time. >i want to get day number and make -1 Try this: #!/usr/bin/perl -w my @now = localtime; my $sec = ( $now[0] ); my $min = ( $now[1] ); my $hr = ( $now[2] ); my $day = ( $now[3] ); my $mth = ( $now[4] + 1 ); my $yr = ( $now[5] + 1900 ); $day = ($day -1); print "Yesterday was $mth/$day/$yr\nor if on the other side of the pond, $day/$mth/$yr\n"; I hope that helps!