Select Code to Download

 ref 1
 ref 2
...
bar
end
...

for (@objects) { $allfile =~ s/^ +$_\n//m; }

for (@objects) { $allfile =~ s/^ *(foo)? +$_\n//mn; }