1
如何让Perl打印月份名称而不是数字,例如:9应该显示为9月份。我希望下面的程序打印月份名称而不是数字。如何打印拼写出月份名称而不是数字
#!/usr/bin/perl
use strict;
use warnings;
use Date::Easter;
print "Please enter a year";
chomp (my $year = <STDIN>);
my ($m1, $d1) = easter ($year);
my ($m2, $d2) = julian_easter ($year);
my ($m3, $d3) = orthodox_easter ($year);
print "Gregorian => Month: $m1 Day: $d1\n";
print "Julian => Month: $m2 Day: $d2\n";
print "Orthodox => Month: $m3 Day: $d3\n";
你忘了日;) – squiguy 2013-04-04 02:20:33
这是我的过敏。我讨厌五月。 – 2013-04-04 14:36:24
雅我注意到,当我添加的代码,我刚刚添加可能在那里:D ...虽然很大的帮助,虽然 – user218001 2013-04-05 02:01:09