if ($ARGV[0] eq 'update'){ update($ARGV[1],$ARGV[2]); } if ($ARGV[0] eq 'insert'){ insert($ARGV[1],$ARGV[2]); } if ($ARGV[0] eq 'delete'){ delete($ARGV[1]); } if ($ARGV[0] eq 'select'){ select(); } else { print " >>> Falscher Parameter! (insert/update/delete/select) <<<\n\n"; }