mirror of
https://github.com/unicode-org/icu.git
synced 2025-04-21 04:29:31 +00:00
ICU-5423 The output now gives the total number of time zones on the system.
X-SVN-Rev: 21703
This commit is contained in:
parent
3a924f6fb7
commit
7a90c71ea2
1 changed files with 4 additions and 4 deletions
|
@ -20,10 +20,10 @@ open(MYFILE, ">$FILE");
|
|||
|
||||
if (scalar(@ARGV) == 3) {
|
||||
($year, $month, $day) = @ARGV;
|
||||
print "We are using $month-$day-$year\n";
|
||||
print "The date we are using is: $month-$day-$year.\n";
|
||||
print MYFILE "We are using $month-$day-$year\n";
|
||||
} else {
|
||||
print "We are using the current time\n";
|
||||
print "We are using the current date.\n";
|
||||
print MYFILE "We are using the current time\n";
|
||||
$USECURRENT = 1;
|
||||
}
|
||||
|
@ -59,8 +59,8 @@ foreach my $tzone (@TZONE) {
|
|||
}
|
||||
}
|
||||
|
||||
print MYFILE "\nThe number of time zones with wrong results: $count\n";
|
||||
print "\nThe number of time zones with wrong results: $count\n";
|
||||
print MYFILE "\nThe number of time zones with wrong results: $count out of $index\n";
|
||||
print "\nThe number of time zones with wrong results: $count out of $index\n";
|
||||
|
||||
close(MYFILE);
|
||||
|
||||
|
|
Loading…
Add table
Reference in a new issue