Select Code to Download

use strict;
my $string = "zero   one  two three";
...
print $string =~ /$regex/;
__END__
one