if ($line=~/^\w+:\s+\w+(@\S|)/) { &i_match(); } else { &i_dont_match(); }