Re: How can I extract part of a string after a specific character

[weini]

#!/usr/bin/perl -w
use strict;
my $string = "TITLE=SPECIAL CASE 1";
$string =~ /.*=(.*)/;
print $1;

. stands for any character but a newline
* for zero or more times
() stores the result in $1.
Type "perldoc perlfaq6" for more details ...

hth
weini

[Abigail-II]

Both you and DamnDirtyApe have a .* preceeding the =. Why?

    print $string =~ /=(.*)/

will do fine.

Abigail

[Juerd]

will do fine.

But not the same. Their versions grab everything after the last =, your version grabs evertyhing after the first one.
I think your solution is better (and I'm sure it's a lot more efficient), but we can't know for sure without more information.

$\ = "\n";

for ('title=foo' ,'title=foo=bar') {
    print "-> $_";
    print /.*=(.*)/;
    print /=(.*)/;
}

- Yes, I reinvent wheels.
- Spam: Visit eurotraQ.

[Abigail-II]

Their versions grab everything after the last =, your version grabs evertyhing after the first one.

Eh, no. Only *one* of their versions grabs everything after the last, the other grabs everything after the first. The problem however didn't specify what should happen if there are multiple = characters present.

Abigail