# perl -e 'print system("alias")'
-1
# perl -e 'open (PIPE, "alias |") or die $@;'
Died at -e line 1.


##</code><code>##

type alias
alias is a shell builtin