concatenation

[Sayed, Irfan \(Irfan\)]

Hi All,
 
I need to concatenate specific string for each element in the array. I
tried in the following way with the help of join operator.
 
foreach (@mail)
{
 my $str1=$_;
 $str1=$str1 . "@abc.com";
 print "$str1\n";
 
}
 
But somehow it is not getting concateneted.
 
please help.
 
Regards
Irfan.