Select Code to Download

#!/usr/bin/perl

...
my $value = 1 x 131/ 1;
my $value1 = $value;
print "$value\n";

1111111111111111111111111111111111111111111111111111111111111111111111
+1111111111111111111111111111111111111111111111111111111111111