Select Code to Download

#!/usr/bin/perl -w
use strict;
...
#case 4                     
@matches = split (/\s/,"hello awesome");
print "@matches\n";  #prints" hello awesome"

#!/usr/bin/perl -w
use strict;
...
print shift (@stuff)."\n"; #prints: el
print shift (@stuff)."\n"; #prints: lo awesome h
print shift( @stuff)."\n"; #prints: om