String Perl

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