How to correct my error in my code which uses Rcs.pm
srins
created: 2006-08-02 16:49:23

Hi,

I am using Rcs version control in my code.
I am doing check out operation for building version based filter.
User will select particular version from my dropdown menu .
Based on user selected version,I will use checkout "co" command in my code internally,to retrive the file based on version selected by user,i use

my version="1.4";
my $rcs = Rcs->new;
$rcs->co('-r $version');
or
$rcs->co('-r$version');
But i am getting error as
co: /auto/data/Test/TestCase/public/TC11544.xml,v: improper revision number:  $version
but when i give
$rcs->co('-r1.4');
i am getting expected output.Returning 1 as output ie success operation.
But i need to pass as $version only.
$version depends on user selection from drop down menu.
so i need to pass as $rcs->co('-r $version'); only.
I also tried following methods but its not working.
my $verfile=`co -r$version`;
$rcs->co("-r" => "$version");
my $verfile=`co -r $version`;
But i am getting error as
co: /auto/data/Test/TestCase/public/TC11544.xml,v: improper revision number:  $version
or as
co: RCS/1.4,v: No such file or directory
Could Some one help me in this regard. What i need to modify to get my code to work. Thanks,
Srins.

20060802 Janitored by [id://5348]: Removed PRE tags, added formatting, code tags, as per [id://17558]

Re: How to correct my error in my code which uses Rcs.pm
created: 2006-08-02 17:01:31
' - quoted strings do not interpolate $variables. You'll want to use " (double quotes):
$rcs->co("-r $version");

See [doc://perldata] for more info.

[id://149675|"What should it profit a man, if he should win a flame war, yet lose his cool?"]

perlmonks.org content © perlmonks.org and Joost, srins

prlmnks.org © 2006 edmund von der burg (eccles & toad)

v 0.03