projects
/
spider.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
added G8TIC 'user' filter example
[spider.git]
/
perl
/
export_user.pl
diff --git
a/perl/export_user.pl
b/perl/export_user.pl
index 2b21466b7ce5d1b9e95a223092c733bbdc0e70f5..3157d21aede0e738b09a9fd67163e0f0981e1583 100755
(executable)
--- a/
perl/export_user.pl
+++ b/
perl/export_user.pl
@@
-40,9
+40,13
@@
package DXUser;
for $a (@all) {
my $ref = DXUser->get($a);
- my $s = $ref->encode();
+ if (ref $ref) {
+ my $s = $ref->encode();
- print "'$a' => qq{ $s },\n";
+ print "'$a' => q{ $s },\n";
+ } else {
+ print "# $a has gorn missing\n";
+ }
$count++;
}
print ");\n