Select Code to Download

use strict;
use warnings;
...

# more time passes ...
print "Your very important number calculation yielded:  $x\n";

#!/usr/bin/perl
use strict;
...
my $pet = 'dog';
   $pet = 'cat';
   $pet = 'ferret';