print "1番目は[split(/,/, $aaa)]->[0]\n";
という文がうまくいかないので、

print "1番目は";
print [split(/,/, $aaa)]->[0];
print "\n";
としているのですが、何か他に良い書き方があるのでしょうか。
おねがいします。