#!/usr/bin/perl -w

use strict;


my @List=(localtime)[1,3];
print @List;