Data Type Perl

#!/usr/bin/perl
use warnings;
use strict;
print scalar(localtime(time())), "\n";