diff options
| -rwxr-xr-x | regress/base/mysql_io.pl | 21 |
1 files changed, 0 insertions, 21 deletions
diff --git a/regress/base/mysql_io.pl b/regress/base/mysql_io.pl deleted file mode 100755 index a61d6635..00000000 --- a/regress/base/mysql_io.pl +++ /dev/null @@ -1,21 +0,0 @@ -#!/usr/pkg/bin/perl -# -# $Id$ -# - -use strict; -use IO::Adapter::MySQL; - -my $obj = new IO::Adapter::MySQL { ml_name => 'elena' }; - -$obj->open({ - sql_user => 'fukachan', - sql_user_password => '', -}); - -while ($_ = $obj->getline) { - print $_, "\n"; -} - -$obj->close; - |
