#!/usr/local/bin/perl -w
use strict;
use re 'debug';
"xyz" =~ /arbITRary CharS ($|--$)/;