Select Code to Download

#!/usr/bin/perl

...
print "Enter a number:";
my $input = <STDIN>;
print "47\n";

#!/usr/bin/perl
use strict;
...
L0130: $A = INPUT();
L0140: PR1NT "\n";
L0150: goto L0010;