if ( /\@/ ) { &Frobnitz($_); }

##</code><code>##

  if ( /^.*\@/ ) { &Frobnitz($_); }