package zor;
sub lol {
  return 'whatever';
}

##</code><code>##

package zor;
sub lol {
  $varry = 'new';
  return 'whatever';
}