regular expression

[mehj123]

HI...

I want to retrieve the view name from an expression like this

 $element = "/Net/xyz/abc/viewstore/hello.vws";
 

i.e i want to retrieve hello.... the problem is that these slashes can sometimes be like

 $element = "\Net\xyz\abc\viewstore\hello.vws";
 

depending upon if it is windows or unix...can anyone plz help me?

[KevinADC]

what have you tried so far?

[mehj123]

what have you tried so far?

This is what I have tried.. But this works only for "/" slashes

 
if($element =~ m/\//)
{
@el = split(/\//,$element);
$c = @el-1;
($view = $el[$c]) =~ s/\.(.*)//g;
print $view;
}
 

[numberwhun]

This is what I have tried.. But this works only for "/" slashes

 
if($element =~ m/\//)
{
@el = split(/\//,$element);
$c = @el-1;
($view = $el[$c]) =~ s/\.(.*)//g;
print $view;
}
 

Well, I have hard coded $element in my example below. Just uncomment the one you want to try, they both work. You can examine the split page on perldoc and see how it works. Now, all you have to do is grab the element you need from the array.

use strict;
use warnings;
 
#my $element = "/Net/xyz/abc/viewstore/hello.vws";
my $element = "\\Net\\xyz\\abc\\viewstore\\hello.vws";
 
my @segments = split(/[\/\\]/, $element);
 
print("@segments\n");
 

Regards,

Jeff

[mehj123]

Well, I have hard coded $element in my example below. Just uncomment the one you want to try, they both work. You can examine the split page on perldoc and see how it works. Now, all you have to do is grab the element you need from the array.

use strict;
use warnings;
 
#my $element = "/Net/xyz/abc/viewstore/hello.vws";
my $element = "\\Net\\xyz\\abc\\viewstore\\hello.vws";
 
my @segments = split(/[\/\\]/, $element);
 
print("@segments\n");
 

Regards,

Jeff

Thanks... But the value of $element is read from a file which has the lines like \Net\xyz\abc\viewstore\hello.vws .. soo is it possible to stuff the escape characters to each line in the file?

[KevinADC]

Thanks... But the value of $element is read from a file which has the lines like \Net\xyz\abc\viewstore\hello.vws .. soo is it possible to stuff the escape characters to each line in the file?

You don't need to escape a backslash that is input from a file. The code Jeff posted should work to split a string on forward slashes or back slashes.

[eWish]

Have you tried to incorporate Jeff's example into your code. It will work no matter where the $element value is coming from.

[mehj123]

Thanks a lot Jeff.. It worked.