perl - SVN::Client - how can I get the latest revision number of a file? -


i'm using svn::client in perl script. documentation demonstrates how info file stored in svn:

$client->info($path_or_url, $peg_revision, $revision, \&receiver, $recurse);

invokes \&receiver passing information $path_or_url $revision. the information returned system-generated metadata, not sort of "property" metadata created users. methods available on object passed \&receiver, see svn_info_t.

 $receiver = sub {      my( $path, $info, $pool ) = @_;      print "current revision of $path ", $info->rev, "\n";  };  $client->info( 'foo/bar.c', undef, 'working', $receiver, 0 ); 

i want return $info->rev, trying like

my $rev_num = $client->info('foo/bar.c', undef, 'working', $receiver, 0); 

returns undef. (obviously, modify above code snippet return $info->rev)

is there way can retrieve information (or otherwise extract $info method)?


Comments