diff options
| author | fukachan <fukachan> | 2001-03-16 04:30:40 +0000 |
|---|---|---|
| committer | fukachan <fukachan> | 2001-03-16 04:30:40 +0000 |
| commit | 038969e30b0ab1c26657d24734a71c534d8167f1 (patch) | |
| tree | 12a8524231a12fc36791b11163f92a1cb0da6b03 | |
| parent | acb9bf0007da2ad673dbad009e084072b2ef2bad (diff) | |
| download | fml8-038969e30b0ab1c26657d24734a71c534d8167f1.tar.gz fml8-038969e30b0ab1c26657d24734a71c534d8167f1.tar.bz2 fml8-038969e30b0ab1c26657d24734a71c534d8167f1.zip | |
use /usr/pkg/bin/perl by default, add args for new()
| -rwxr-xr-x | regress/base/mysql_io.pl | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/regress/base/mysql_io.pl b/regress/base/mysql_io.pl index 1339e65b..e1846385 100755 --- a/regress/base/mysql_io.pl +++ b/regress/base/mysql_io.pl @@ -1,6 +1,12 @@ +#!/usr/pkg/bin/perl +# +# $Id$ +# + +use strict; use IO::Adapter::MySQL::toymodel; -my $obj = new IO::Adapter::MySQL::toymodel; +my $obj = new IO::Adapter::MySQL::toymodel { ml_name => 'elena' }; $obj->open({ sql_user => 'fukachan', |