$foo = '^';
m/$foo/