Help for this page
$foo = qq{^snafu^|^foobar^\n}; ... print "[$text_qual]\n"; print "[$field_sep]\n";
[^] [|]