my %text = split quotemeta( $delim ), $text;