#!/usr/bin/perl -w
use strict;
print @{localtime()}[1,3];
1;

##</code><code>##

perl -c ltimetest.pl