Select Code to Download

#!/usr/bin/perl
# name: date.pl
...

#$newdate is now one year in the furure.
my $newdate = $date+$delta;

phillip@Athen:~/script$ perl date1.pl
Locale en_US does not seem to be implemented on this system, keeping 
...
locale 
Locale en_US does not seem to be implemented on this system, keeping 
locale

phillip@Athen:~/script$ locale
LANG=zh_CN.utf8
...
LC_MEASUREMENT="zh_CN.utf8"
LC_IDENTIFICATION="zh_CN.utf8"
LC_ALL=

#!/usr/bin/perl

...

my $newdate = $date + $delta;

phillip@Athen:~/script$ perl date.pl
Locale en_US does not seem to be implemented on this system, keeping 
locale 
Locale en_US does not seem to be implemented on this system, keeping 
locale