my $hex_string = sprintf '%X', 1365238130;