怎样用perl从数据库中提取数据并保存成一个二维数组显示出来？

比如说我现在有个表金额历史表（账号，开始日期，金额类型代码，金额，结束日期），其中账号，开始日期是主键，金额类型代码是外键，关联金额类型代码表（金额类型代码，金额类型代码描述）。

怎样用perl 从数据库中的金额类型代码表中取出数据并存成二维数组，以便于将系统源数据插入到金额历史表中？

举报该问题

其他回答

第1个回答 2014-11-18

是不是要做该表中的第三四列的相互关联工作？
用hash，后面的代码文字说明如果唯一的话，用该列作key，前面的数字代码做value，一个文字说明，对应一个数字代码，有这样的对应关系，就可以用起来了。
或者直接split后，检测文字说明那一列是否有你需要的关键词，然后也能对应上前面那一列。本回答被网友采纳

第2个回答 2019-04-16

你这个数据看起来是文本，可以用记事本打开确认，如果是文本数据，perl读取是很容易的，open打开文件，以行为单位读入，使用split分为数组，然后取你需要的就可以了，大概的代码如下：
my
($str,@arr);open(fd,'xxx.txt');while($str=){
@arr=sp...

相似回答

怎样用perl从数据库中提取数据并存成一个二维数组答：1、使用双层循环语句，就可以依次把数据顺序读入到一个二维数组当中了。2、例程：include <stdio.h> include <string.h> define MAXLINE 3 define MAXCOLUMN 10 void main(void){ FILE *fp; //文件指针 char arr[MAXLINE][MAXCOLUMN]={0}; //定义3行10列的二维数组并初始化 int i = -1;...

怎么用perl 输出一个二维数组?答：可以用一个foreach语句输出二维数组 例如二维数组：@arr=（[0,0,0,0,0], [0,0,0,0,0], [0,0,0,0,0], [0,0,0,0,0],);foreach (@arr){print join(' ', @$_), "\n";}

如何用perl读取一个文件夹下的大量首列相同的txt文件,要进行列合并...答：把每个文件的每一行split成两个元素，然后把第二个元素（也就是第二列的数据）加到二维数组中，并且保证不同文件中行数相同的列在同一个子数组中（说的有点绕，希望你懂）。输出的时候直接用换行符join

如何用perl访问二维表格,并提取其中的三列数据?答：你这个数据看起来是文本，可以用记事本打开确认，如果是文本数据，PERL读取是很容易的，open打开文件，以行为单位读入，使用split分为数组，然后取你需要的就可以了，大概的代码如下：my ($str,@arr);open(FD,'xxx.txt');while($str=<FD>){ @arr=split(/\s+/,$str); print $arr[1]....

大家正在搜

如何从数据库中提取数据从数据库中提取数据的软件 sql如何从数据库提取数据怎么将数据库文件提取出来自动提取多个数据库数据数据库提取数据 perl中数据库连接失败处理数据库读取数据 perl中调用shell脚本