每个bash进程都有自己的别名列表。
如果你想要一个新启动的交互式bash进程的别名，[1]你可以执行

bash -i -c alias

要执行该命令，可以使用

my $output = qx{bash -i -c alias};
die( "Couldn't execute child: $!\n"               ) if $? == -1;
die( "Child killed by signal ".( $? & 0x7F )."\n" ) if $? & 0x7F;
die( "Child exited with error ".( $? >> 8 )."\n"  ) if $? >> 8;

或

use IPC::System::Simple qw( capturex );

my $output = capturex( "bash", "-i", "-c", "alias" );

后者为您处理错误检查，并且避免运行第二个shell（避免运行sh来运行bash）。
1.别名通常不会在非交互式shell中创建。

因为alias是一个内置在交互式shell中的shell，所以可以尝试：

qx(bash -ci alias)