Stuff

do {something, "anything";}
until ("you"); 
wilt, into, NULL;

for(death;is;coming){
my $love=

"like crumbs"; 
        out, last; die 
        quietly, suddenly;}

$expired++ foreach 
                            ("s" , "e" , "c" , "o" , "n" , "d");
print $expired . $expired . $expired;