Select Code to Download

open my $pipe, '-|', 'ls -1b' or die $!;
while(<$pipe>){
...
  say qq| <tag attr='value'>$_</tag> |;
}
close $pipe;