sub test
{
  my $arg = shift;
  my $test = '';

  defined $arg and $test = 'a';
  $test .= 'b';

  return $test;
}