nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

Substituing variable

ReggieRWalker

I have a script:

my $path = "Y:\\default\\main\\Portal\\WORKAREA\\workarea\\personal\\file.asp";
my $dir = "Y:\\default\\main\\Portal\\WORKAREA\\workarea\\personal\\";

$path =~ s/$dir//;
print $path;

where $path still prints "Y:\\default\\main\\Portal\\WORKAREA\\workarea\\personal\\file.asp" when I expect it to print "file.asp."

Can I not substitute using variables?

TIA

Find more posts tagged with

Comments

Migrateduser

You sure can, but I'm wondering if the backslashes are doing you in. Ghoti is awesome with this stuff, so I'll defer to him for now, but my money is on the backslashes.

Dave

Current Environment(s):
(1) TS 6.1 SP2 on W2K3
(2) TS 6.1 SP1 on W2K
(3) TS 6.1 SP2 on Win2K

Migrateduser

I think you are running into an interpolation problem with your backslashes. Either try single-quoting the strings and getting rid of the quoting backslash, or try the \Q metacharacter to stop the interpolation of the contents of the variable. If you put what you have in a script and run it from the command line, it shouldn't even compile. Try this:


my $path = "Y:\\default\\main\\Portal\\WORKAREA\\workarea\\personal\\file.asp";
my $dir = "Y:\\default\\main\\Portal\\WORKAREA\\workarea\\personal\\";

$path =~ s/\Q$dir//;
print $path;

Migrateduser

It is the backslashes... I just put it into "The Regex Coach" and it matched only when the backslashes themselves were escaped. I haven't tried Rob's suggestion, but if that doesn't work, why not replace the "\\" with "/"?

Dave

Current Environment(s):
(1) TS 6.1 SP2 on W2K3
(2) TS 6.1 SP1 on W2K
(3) TS 6.1 SP2 on Win2K

ReggieRWalker

Thanks guys for the help!

Rob, you were right! Works fine!

Thanks again

Adam Stoller

Glad to hear it works now - but in the future you would be best served to make sure all your paths use forward-slashes rather than back-slashes

$path =~ tr|\\|/|;

and then you can use simpler regex's from that point on.

Forward slashes work on both Windows and Unix. Back slashes only work on Windows.

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com

Valentine

use File::Basename;

fileparse - split a pathname into pieces

basename - extract just the filename from a path

dirname - extract just the directory from a path

Platform independent, and you don't have to worry about backslashes/slashes.

Adam Stoller

True - but the performance aspects of File::Basename are not very good (run some benchmarks with it against using regex's and the regex's tend to win hands-down.

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com

shanon

amen to that. please please use regexps when you can instead of some get-out-of-jail cpan module. you'll learn something and your code will run faster.

Shanon Levenherz
Mercer eBusiness Team
shanon.levenherz@mercer.com
http://www.mercerhr.com

Adam Stoller

Let's not go too far here ...

There are quite a lot of GOOD cpan module out there - that provide significant functionality for little effort (as opposed to the effort you'd have to put in to do them yourself).

This just happens to be one of those cases where the module does a lot more than is needed and thus takes a lot longer to do it than a simple regex.

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com

shanon

you are right, but i wasn't saying that all cpan modules are bad. i was just saying that in my experience, i've seen lots of gratuitous usage of modules ( e.g. File::Basename ) where a single line regexp would have done the same thing faster... i certainly use cpan modules often, but only when i feel that they add true value ( i.e. provide clean and quick access to otherwise tedious task(s) ).

Shanon Levenherz
Mercer eBusiness Team
shanon.levenherz@mercer.com
http://www.mercerhr.com