X-Git-Url: http://gb7djk.dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=perl%2Fconvert_users.pl;h=b55daea0f250a287bb145e4b53475ee9c80b33d7;hb=ab811a0c902225075a9bd69749f65594079433a9;hp=bb39213145fbd66ae1eeff8890ed125546cb417f;hpb=1728c7c7a64eaf2852c490629f022c7e70bc46e2;p=spider.git diff --git a/perl/convert_users.pl b/perl/convert_users.pl index bb392131..b55daea0 100755 --- a/perl/convert_users.pl +++ b/perl/convert_users.pl @@ -50,8 +50,8 @@ package DXUser; @all = DXUser::get_all_calls(); for $a (@all) { - my $ref = DXUser->get($a); - my $s = $ref->encode(); + my $ref = DXUser::get($a); + my $s = $ref->encode() if $ref; print OUT "'$a' => q{$s},\n" if $a; $count++; }