FreewarWiki:Bot/Skripts/npclist2fightcalcdata.pl

aus FreewarWiki, der Referenz für Freewar
Zur Navigation springen Zur Suche springen 
#!/usr/bin/perl
#input: npclist
use constant CUnknown => "?";

while(<>)
{
  next if (/^GET/);
  my ($name, $atk, $lp) = split(/;/);
 
  if ($name ne CUnknown && $atk ne CUnknown && $lp ne CUnknown) {
    printf("%s;%s;%s\n", $name, $atk, $lp);
  }
}
Abgerufen von „https://fwwiki.de/index.php?title=FreewarWiki:Bot/Skripts/npclist2fightcalcdata.pl&oldid=222670“