String Perl

#!/usr/bin/perl
use warnings;
print"Ba". "na"x4*3 ,"\n";
print "Ba". "na"x(4*3) ,"\n";