vpath (Windows 2000 ,TS 6.1)

Please suggest what all packages and commands I should use if I want to generate the vpaths to the files and folders opened.
Thanks

Find more posts tagged with

Comments

homesick123

Please suggest what all packages and commands I should use if I want to generate the vpaths to the files and folders opened.
Thanks

The files and folders are inside Teamsite Y:

Sailesh

Not very clear from your question what you want to acheive?? where exactly you want to extract the vPath?

If using it in workflow then $task->GetArea(); would return vpath.

homesick123

Not very clear from your question what you want to acheive?? where exactly you want to extract the vPath?

Hi
I have to submit all the modified files in the Default store to staging.
i am usinf iwlistmod.exe to find out all the modified files in a workarea. Now ,how should I generate the vpath to these workareas where the files have been modified?
Thanks

Sailesh

can use clt iwvpath, can refer to clt document at page 195 for more details about its usage.

homesick123

can use clt iwvpath, can refer to clt document at page 195 for more details about its usage.

If i am not wrong this CLT performs operations on the vpath provided.It doesnot generate a vpath.

Sailesh

Oops !! yes true..

use TeamSite::Config;
my $iwmount = TeamSite::Config::iwgetmount();
my $iwhome = fix_path(TeamSite::Config::iwgethome());
...
sub fix_path{
(my $path = shift) =~ tr|\\|/|; # use forward-slashes
$path =~ s|^//[^/]+||; # remove server-specific vpath prefix, if present
$path =~ s|^$iwmount||; # remove iwmount prefix if present, add it back explicitly where/when necessary
return $path;
}Found something from previous post which would suit your requirement. Hope this helps Smiley Happy

Adam Stoller

Hi
I have to submit all the modified files in the Default store to staging.
i am usinf iwlistmod.exe to find out all the modified files in a workarea. Now ,how should I generate the vpath to these workareas where the files have been modified?
Thanks

If you're using iwlistmod to find the modified files - you are already providing a vpath to iwlistmod in order to do so.
Use that vpath as a prefix to all paths returned in the results of running iwlistmod. E.g.:

...
my $path = "/default/main/devnet/WORKAREA/work";
my @results = qx($iwlistmod $path 2>&1);
chomp(@results);
s|^[a-z]?\s*|$path/| foreach(@results);
...

homesick123

If you're using iwlistmod to find the modified files - you are already providing a vpath to iwlistmod in order to do so.
Use that vpath as a prefix to all paths returned in the results of running iwlistmod. E.g.:
...
my $path = "/default/main/devnet/WORKAREA/work";
my @results = qx($iwlistmod $path 2>&1);
chomp(@results);
s|^[a-z]?\s*|$path/| foreach(@results);
...

Could you please explain what the purpose of 2>&1 is?

Adam Stoller

Could you please explain what the purpose of 2>&1 is?

To send any output that would normally be sent to STDERR (2) to STDOUT (1) so that it can be captured in the return results of the command being run and stored into the array (@results).

It isn't always necessary - but unfortunately there's a long history of inconsistency with regard to the way the TS CLTs do things that it generally makes sense to always use this redirection so as to make sure you capture all the output.