X-Git-Url: https://ruin.nu/git/?a=blobdiff_plain;f=scripts%2Fparsegalaxies.pl;h=561b244f4b97de34a970f5afba9f31a80c039f88;hb=f85a252b56bf58c0280d5484397ac8b69dcbdc29;hp=af9d6ec04c102ace12e47b9a8f3ac30dcdf09104;hpb=13e3df1e4218c19325ef732a4a2cb2b7db79a69c;p=ndwebbie.git diff --git a/scripts/parsegalaxies.pl b/scripts/parsegalaxies.pl index af9d6ec..561b244 100755 --- a/scripts/parsegalaxies.pl +++ b/scripts/parsegalaxies.pl @@ -27,7 +27,8 @@ use DBD::Pg qw(:pg_types); use LWP::Simple; -use lib qw{/var/www/ndawn/lib/}; +use FindBin; +use lib "$FindBin::Bin/../lib"; use ND::Include; use ND::DB; @@ -46,7 +47,7 @@ my @galaxies; if (@_ = $dumps->fetchrow){ $_ = $_[0]; $hour = (gmtime($_[1]))[2]; - while (m/(\d+)\t(\d+)\t\"(?:.+)\"\t(\d+)\t(\d+)\t(\d+)\t(\d+)/g){ + while (m/(\d+)\t(\d+)\t\"(?:.*)\"\t(\d+)\t(\d+)\t(\d+)\t(\d+)/g){ push @galaxies,[$tick,$1,$2,$3,$4,$5,$6,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0]; } }