#!/usr/bin/perl
print("The Perl5 Add/Multiply Program.\n"); $a = 50;
$b = 50;
$c = ($a + $ b);
print("A ". $a." B " . $b . " C ".$c."\n"); $d = 50;
$e = 50;
$f = ($d * $e);
print("D ".$d." E ".$e." F ".$f."\n");
IyEvdXNyL2Jpbi9wZXJsCnByaW50KCJUaGUgUGVybDUgQWRkL011bHRpcGx5IFByb2dyYW0uXG4iKTsKJGEgPSA1MDsKJGIgPSA1MDsKJGMgPSAoJGEgKyAkIGIpOwpwcmludCgiQSAiLiAkYS4iIEIgIiAuICRiIC4gIiBDICIuJGMuIlxuIik7CiRkID0gNTA7CiRlID0gNTA7CiRmID0gKCRkICogJGUpOwpwcmludCgiRCAiLiRkLiIgRSAiLiRlLiIgRiAiLiRmLiJcbiIpOw==