use warnings;
use strict;

my @aliases = qx(ksh -c alias);

print "@aliases\n";