A
 33
B
 22

##</code><code>##

my $A = "33";
my $B = "22";