select*fromtableforupdate然后点那个锁头然后修改数据，然后点上边个一个绿色箭头提交
❷ 怎样让perl脚本中执行sql语句
首先得确保安装了数据库接口模块和相应数据库的驱动模块，如果是用MySql数据库（开源免费新手入门学习都喜欢），则需要确定DBI和DBD::mysql这两个模块是否安装；
然后在perl脚本中写：
!#usr/bin/perl -w
use strict;
use DBI; #使用DBI模块，DBD::mysql是驱动不必在脚本中使用，安装了就行
my $dbname = ""; #引号里填上数据库名
my $ip = ""; #引号里填上要访问的数据库的ip地址，数据库是本机就写127.0.0.1
my $port = ""; #引号里填上要访问的数据库的端口号，mysql默认端口号是3306
my $host = "dbi:mysql:" . $dbname . ":" . $ip . ":" . $port ;
my $user = "root"; #访问数据库使用的用户名
my $password = "xXxX"; #该用户名所使用的密码
my $dbh = DBI -> connect($host,$user,$password) or die "$@"; #与数据库建立连接
$dbh -> do("set names \'gbk\';"); #设置输出中文不乱码
while(1) #条件永远为真，除非人为终止，否则不会停止
{ #可以使用control+c停止脚本执行
my $sql = ""; #引号里填上sql语句
$sth = $dbh -> prepare($sql); #送入数据库做准备
$sth -> execute(); #执行这条sql语句
sleep(300); #设置300秒暂停执行，300秒后继续执行while
}
$dbh -> disconnect(); #断开与数据库的连接
这里使用的是最新的perl和最新的mysql最新，不是复制粘贴别人代码，前几天还在用，保证思路没有问题。
❸ 下为一perl编写的脚本处理数据库,请教这个中间的sql语句在干什么
select
concat(left(starttime,2),':00:00') --取时间的前2位，就是小时， 如09:11:01就变成09:00:00
as d
from cellopt.hw_sector_hourly_0
where startdate = '$d' --条件为开始日期 由参数传入
group by hour(starttime)";--按开始时间的小时进行分组
❹ perl脚本怎么调用perl脚本
方法有许多种，最简单的 system("~/myperl.pl");最常用的 @result=`"～/myperl.pl"`;
❺ 怎样写perl脚本用sql去操作大数据平台里的数据
你需要有数据库的用户名和密码
use DBI;
$DSN = 'driver={SQL Server};Server=数据库名; Database=表名;UID=用户名;PWD=密码;';
$dbh = DBI->connect("dbi:ODBC:$DSN",{'RaiseError' => 1,AutoCommit => 0});
$SQL = "SQL语句";
$Select = $dbh -> prepare($SQL);
$Select -> execute();
($cust_code) = $Select->fetchrow_array;
❻ 这段sql我是放在perl脚本里执行的,但是batchno都是重复的，我想让他每条batchno都+1，不知道该怎么写
my$q=<<"QUERY";
....wherekey_name='batchno';
.....
QUERY
formy$incre(1..10000){
my$=$q;
$=~s/batchno/$incre/;
$dbh->do($)
}