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