Help for this page

Select Code to Download


  1. or download this
    #!/usr/cisco/bin/perl -w
use strict;
...

   print_response( );
}
  2. or download this
    #!/usr/cisco/bin/perl -w
use strict;
...

   print_response($name);
}
  3. or download this
    #!/usr/cisco/bin/perl -w
use strict;
...
   my $self = __PACKAGE__->new();
   $self->print_response();
}