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
, 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