Rename to .pl as now a proper Perl script

1 files changed, 4 insertions, 0 deletions

diff --git a/unixtime.pl b/unixtime.pl
new file mode 100755
index 0000000..f371b0c
--- /dev/null
+++ b/unixtime.pl
@@ -0,0 +1,4 @@
+#!/usr/bin/perl
+use POSIX qw( strftime );
+
+print strftime('%a %b %e %H:%M:%S %Z %Y', localtime( $ARGV[0] ) );