fork download
while () {
  print '..', $_ if 1..($. >= 1); 
  print '...', $_ if 1...($. >= 1);
}
__DATA__
1
2
3
Success #stdin #stdout 0s 3608KB
stdin
Standard input is empty
stdout
..1
...1
...2