#!/usr/bin/perl use Mysql; $argnum = $#ARGV+1; if ($argnum < 5) { print "Usage : $0 [host] [db] [id] [password] [query]\n"; exit(1); } $DBHOST=$ARGV[0]; $DBNAME=$ARGV[1]; $DBUSER=$ARGV[2]; $DBPASS=$ARGV[3]; $query=$ARGV[4]; $DB=Mysql->connect($DBHOST, $DBNAME, $DBUSER, $DBPASS) || die "Mysql Connection FAILURE\n"; $rst = $DB->Query($query) || die "Mysql Query FAILURE\n"; print "Mysql Query Success\n";
Copyrights © - Joinc, All Rights Reserved. Inherited From - Yundream Rebranded By - Joonphil
소개
#!/usr/bin/perl use Mysql; $argnum = $#ARGV+1; if ($argnum < 5) { print "Usage : $0 [host] [db] [id] [password] [query]\n"; exit(1); } $DBHOST=$ARGV[0]; $DBNAME=$ARGV[1]; $DBUSER=$ARGV[2]; $DBPASS=$ARGV[3]; $query=$ARGV[4]; $DB=Mysql->connect($DBHOST, $DBNAME, $DBUSER, $DBPASS) || die "Mysql Connection FAILURE\n"; $rst = $DB->Query($query) || die "Mysql Query FAILURE\n"; print "Mysql Query Success\n";관련글
Recent Posts
Archive Posts
Tags