Select Code to Download

#!/usr/bin/perl
use strict;
...
  to => 'megabytes',
);
print $conversion;

sub make_singular {
  my $word = shift;
...
  
  return lc $word;
}