my $ipn=qr/\( going \) there/; or my $ipn=qw/\( going \) there/; #### my $ipn="\( going \) there";