in reply to Re: Regex word optionsin thread Regex word options
why not try:
if( $inputStr =~ /^(Arranged\,|Transcribe\,)/ ){ ### do your stuff } [download]