fork download
  1. #!/usr/bin/perl
  2.  
  3. my @list = ("How are you.pdf", "This is another.file");
  4. for (@list) {
  5. s/ /./g;
  6. print $_ . $/;
  7. }
Success #stdin #stdout 0s 6000KB
stdin
Standard input is empty
stdout
How.are.you.pdf
This.is.another.file