diff options
| author | Haru <haru@dotalux.com> | 2019-05-06 01:20:55 +0200 |
|---|---|---|
| committer | GitHub <noreply@github.com> | 2019-05-06 01:20:55 +0200 |
| commit | 99264cfd04fb64dce1769489d3e40c98616bb852 (patch) | |
| tree | 152a387db8f77464a7111073a3de2de8611816c9 | |
| parent | 60397aebbc67759ca35b546c0bbf6cf814735e14 (diff) | |
| parent | c9abf7108f3bd2bde0a7fa2a54eaec6898710195 (diff) | |
| download | hercules-99264cfd04fb64dce1769489d3e40c98616bb852.tar.gz hercules-99264cfd04fb64dce1769489d3e40c98616bb852.tar.bz2 hercules-99264cfd04fb64dce1769489d3e40c98616bb852.tar.xz hercules-99264cfd04fb64dce1769489d3e40c98616bb852.zip | |
Merge pull request #2444 from jenkijo/tool-patch
Fixed issue with Perl v5.2x
| -rwxr-xr-x | tools/itemdbconverter.pl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/tools/itemdbconverter.pl b/tools/itemdbconverter.pl index 58cb08bc1..fe30ce24e 100755 --- a/tools/itemdbconverter.pl +++ b/tools/itemdbconverter.pl @@ -109,9 +109,9 @@ sub parsedb (@) { (?<eLV>[0-9]*)[^,:]*(?<hasmaxlv>:[\s\t]*(?<eLVmax>[0-9]*))?[^,]*,[\s\t]* (?<Refineable>[0-9]*)[^,]*,[\s\t]* (?<View>[0-9]*)[^,]*,[\s\t]* - {(?<Script>.*)}, - {(?<OnEquip>.*)}, - {(?<OnUnequip>.*)} + \{(?<Script>.*)}, + \{(?<OnEquip>.*)}, + \{(?<OnUnequip>.*)} /x ) { my %cols = map { $_ => $+{$_} } keys %+; print "/*\n" if $cols{prefix}; |