#!/usr/bin/perl6
print("The Perl6 Add/Multiply Program.\n");
my $a = 50;
my $b = 50;
my $c = ($a + $b);
print("A " ~ $a ~ " B " ~ $b ~ " C " ~ $c ~ "\n");
my $d = 50;
my $e = 50;
my $f = ($d * $e);
print("D "~$d~" E "~$e~" F "~$f~"\n");
IyEvdXNyL2Jpbi9wZXJsNgpwcmludCgiVGhlIFBlcmw2IEFkZC9NdWx0aXBseSBQcm9ncmFtLlxuIik7Cm15ICRhID0gNTA7Cm15ICRiID0gNTA7Cm15ICRjID0gKCRhICsgJGIpOwpwcmludCgiQSAiIH4gJGEgfiAiIEIgIiB+ICRiIH4gIiBDICIgfiAkYyB+ICJcbiIpOwpteSAkZCA9IDUwOwpteSAkZSA9IDUwOwpteSAkZiA9ICgkZCAqICRlKTsKcHJpbnQoIkQgIn4kZH4iIEUgIn4kZX4iIEYgIn4kZn4iXG4iKTs=