my $r = ['111','222','aaa','bbb'];
print $r;           
my $s = ('111','222','aaa','bbb');
print $s;