Aargh (zu schnell getippt)!

[Patrick Andrieu]

Hallo Patrick!

open INPUT, "/path/to/inputfile.html" or die "Can't open file: $!";
open OUTPUT, ">>/path/to/outputfile.txt" or die "Can't open file: $!";

#             ^^ Die wollen wir ja beschreiben!!!

my $count = 1;
while (<INPUT>) {
   $count = $count < 10 ? "  ".$count : $count < 100 ? " ".$count : $count;
   print OUTPUT "$count: $_";
   $count++;
}

  
Viele Grüße aus Frankfurt/Main,  
Patrick

-- 
![](http://www.atomic-eggs.com/fuernA.jpg)  
  
\_ - jenseits vom delirium - \_  
  
[[link:hatehtehpehdoppelpunktslashslashwehwehwehpunktatomicminuseggspunktcomslash](http://www.atomic-eggs.com/)]  
Nichts ist unmöglich? [Doch!](http://www.atomic-eggs.com/cwi/cwi_4.shtml)  
Heute schon ge[gök](http://goek.atomic-eggs.com/goek_goek.html)t?