localtime

• Well, actually, I blew it again

• The real program has this at the top:

        if ($ARGV[0] eq '-f') {
          *show_localtime = \&show_localtime_list;
          shift;
        }

• And this at the bottom:

        sub show_localtime_list {
          my $t = shift;
          my @a = localtime $t;
          "@a\n"
        }

• So you can say

        % localtime -f 1089231416
        56 16 16 7 6 104 3 188 1

• What was I thinking?

Next

Menu

Copyright © 2012 M. J. Dominus