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
\&receiverpassing information$path_or_url$revision. the information returned system-generated metadata, not sort of "property" metadata created users. methods available on object passed\&receiver, seesvn_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
Post a Comment