$\ = "\n";

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