Select Code to Download

my $var = "1 word here another word";
my @words = split /\s+/, $var;

my $var = '     some words  ';
$var =~ s/\A
...
    \s*
    \z
/$1/x;