Help for this page
$string = q[Jon 'Maddog' Orwant]; $string = q{Jon 'Maddog' Orwant}; $string = q(Jon 'Maddog' Orwant); $string = q<Jon 'Maddog' Orwant>;
m/(q[qxwr]?)(\[.*?\]|\{.*?\}|\(.*?\)|\<.*?\>)/