Concatenation और Repetition

use strict;
use warnings;

my $first = "Hello";
my $second = "World";
my $greeting = $first . ", " . $second . "!";
print "$greeting\n";

my $text = "abc";
$text .= "def";
print "$text\n";

print "-" x 20, "\n";
print "=" x 0, "|empty|\n";
my @zeros = (0) x 5;
print "zeros: @zeros\n";
print "Total: " . (2 + 3) . "\n";

# Output:
# Hello, World!
# abcdef
# --------------------
# |empty|
# zeros: 0 0 0 0 0
# Total: 5

1. strings concatenate करने के लिए + इस्तेमाल करना
2. यह भूल जाना कि negative count वाला x एक empty string देता है
3. (0) x 5 लिखना और एक list की बजाय एक string की उम्मीद करना

• . strings concatenate करता है
• .= एक variable में append करता है
• x एक string repeat करता है
• (list) x n एक list repeat करता है