#<--Paramenter müssen hier schon geprüft sein.
&mein_prepare($statement);

sub mein_prepare
{
  my $state = $_;  #man kann auch shiften
  # hier ev. Statement parsen
  $dbh->prepare($_);
}