use Shell 'repo-add';

...

repo_add(@args);

##</code><code>##

--- Shell.pm.old	2008-07-08 12:09:00.000000000 -0700
+++ Shell.pm	2008-07-08 14:17:11.000000000 -0700
@@ -21,8 +21,9 @@
         @EXPORT = 'AUTOLOAD';
     }
     foreach my $sym (@EXPORT) {
+        (my $perlsym = $sym) =~ s/[^a-zA-Z0-9_]/_/g;
         no strict 'refs';
-        *{"${callpack}::$sym"} = \&{"Shell::$sym"};
+        *{"${callpack}::$perlsym"} = \&{"Shell::$sym"};
     }
 }