小编Sou*_*ode的帖子

我想在lib路径中使用$ var变量.

my $var = "/home/usr/bibfile;"

use lib "$var/lib/";

但是,当我这样做时,它会抛出一个错误.

我想用use lib "$var/lib/";而不是use lib "/home/usr/bibfile/lib/";.

如何分配变量,以便可以在lib模块的设置中使用？

perl脚本包含脚本开头的所有模块名称.

例如:

use strict;
use XML::Parser;
use XML::Simple;
use DBI;
use DBD::DB2::Constants;
use POSIX qw( strftime );
use Storable qw(dclone);
use Data::Dumper;
use Carp;

如何将所有模块名称保存在另一个文件中并将文件包含在主perl脚本中？

谢谢.

如何在一行中初始化和清除多个哈希.

例如:

my %hash1 = ();
my %hash2 = ();
my %hash3 = ();
my %hash4 = ();

至

my ( %hash1, %hash2, %hash3, %hash4 ) = ?

有没有更简单的方法将char添加到perl中数组元素的开头和结尾.

Ex:my $str ='table1,table2,table3'

my @arry = split (/,/,$str)

我喜欢输出应该是这样的

'table1','table2','table3'

所以它可以在sql查询中使用

谢谢.