Tengo el siguiente código:
my $a = "
11
11
11 11
11 11
00 00
00 00
0000000000
00 00
00 00
";
my $b = "
11111111
11 11
11 11
11 11
00000000
00 00
00 00
00 00
00000000
";
my $c = "
11111111
11 11
11
11
00
00
00
00 00
00000000
";
chomp $a;
chomp $b;
chomp $c;
print $a.$b.$c;
Mi plan es que se junten ...