On Sybase, just splitting such statements with a new line seemed to work fine. I'm not too familiar with mysql - but unless you would normally use the ';' command terminator when you are running one command - then it looks to me like it won't help with multiple commands.

Here's some sample code for Sybase anyway - hope this might help a little:

#!/usr/bin/perl -w

use DBI;
use strict;

my $foo=DBI->connect('DBI:Sybase:server=FOO', user, pass)||die "Connec
+tion Failed! $DBI::errstr\n";
my $sql="CREATE TABLE dbo.foo\n(bar int NOT NULL)\nCREATE TABLE dbo.fo
+otoo\n(bar int NOT NULL)";
my $fooexec=$foo->prepare($sql);
$fooexec->execute()||die "SQL failed: $!\n";
$fooexec->finish();
$foo->disconnect();

exit (0);
[download]

UPDATE: Thanks bobione - fixed that problem :)

---

game(Wookie,opponent) eq 'Wookie' ? undef $problem : remove_limbs(arms,opponent);