How do you execute cross-platform functions emulating common shell commands in Perl?

#!/usr/bin/perl -w

use Shell::Command;

date;
ls -lrt;