Select Code to Download

Select or download this

#! /usr/intel/pkgs/perl/5.12.2/bin/perl

use strict;
...
    $cred->username( 'username' );
    $cred->password( 'password' );
}

Select or download this

plxc16479> $h2/scripts/super_test.pl
Calling main ls with arguments:
https://svn.repo.url
...
HEAD
1
TypeError in method 'svn_client_ls', argument 2 of type 'char const *'

Select or download this

plxc16479> $h2/scripts/super_test.pl
Calling main ls with arguments:
https://svn.repo.url
...
          'revision' => bless( do{\(my $o = 10904232)}, '_p_svn_dirent
+_t' ),
          'all.plist' => bless( do{\(my $o = 10904112)}, '_p_svn_diren
+t_t' )
        };

Select or download this

sub ls {
    my $self = shift;
    print "Sub ls function called with arguments:\n".join("\n", @_)."\
+n";
    bless $self, 'SVN::Client';
    $self->SUPER::ls(@_);
}