#!/usr/bin/perl -w

use strict;

check_for_in( "derby" );

sub check_for_in( $ )
{
   my( $arg ) = shift;
   print  $arg, "\n";
}

##</code><code>##

#!/usr/bin/perl -w

use strict;

sub check_for_in( $ )
{
   my( $arg ) = shift;
   print  $arg, "\n";
}

check_for_in( "derby" );