12345678910 #!/usr/local/bin/perluse blib;use strict;use warnings;use AFS::Utils qw (sysname);print 'SysName = ', sysname, "\n";$AFS::CODE and print "AFS::CODE = $AFS::CODE\n";
#!/usr/local/bin/perl
use
blib;
strict;
warnings;
AFS::Utils
qw (sysname);
print
'SysName = '
, sysname,
"\n"
;
$AFS::CODE
and
"AFS::CODE = $AFS::CODE\n"