110 B
None
0 👍
0 👎
#!/usr/bin/env perl use warnings; @date=split / /, qx/date/; chomp @date; $"="/"; print "@date[5,1,2]\n";
Comments