in reply to How can I extract part of a string after a specific character

Here is a crazy way to do it: 
my $test = "TITLE=SPECIAL CASE 1";
my @temp;
for(reverse split(//,$test)){
    last if /=/;
    push @temp,($_);
    }
print reverse @temp;

[download]

-caedes

In Section Seekers of Perl Wisdom