Let perl do the escaping for you:
In reply to Re: Variable as split delimiter by Not_a_Number in thread Variable as split delimiter by punch_card_don