我用这段代码 [code]use strict; use warnings; my $key; foreach $key (keys %::){ print sprintf( "%20s", $key ), " =>; ", sprintf( "%-30s", $::{$key} ), "\n"; }[/code] 获得了如下的结果： [code] / =>; *main::/ stderr =>; *main::stderr _<.\win32.c =>; *main::_<.\win32.c SIG =>; *main::SIG _<perllib.c =>; *main::_<perllib.c utf8:: =>; ...

我们在编写perl程序的时候总是会调用很多函数，来实现某一个功能。 那么如果现在我要实现某一功能，而没有实现这个功能的对应函数，那我是否可以在独立于程序之外自己 编写一个函数，然后将其存放在perl函数统一存放的地方，然后在程序中直接调用我的自制函数？（理论上应 该是可以的，毕竟perl自带的一些常用函数也都是高手们编写出来供大家用的） 那么，问题1： 这些函数应该存放的地方是哪里？ perl文件夹下或pe...

有的话，是什么含义，谢谢了！

$- 当前页可打印的行数,属于perl格式系统的一部分 $! 根据上下文内容返回错误号或者错误串 $” 列表分隔符 $# 打印数字时默认的数字输出格式 $$ perl解释器的进程ID $% 当前输出通道的当前页号 $& 与上个格式匹配的字符串 $( 当前进程的组ID $) 当前进程的有效组ID $* 设置1表示处理多行格式.现在多以/s和/m修饰符取代之. $, 当前输出字段分隔符 $. 上次阅读的文件的当前输入行号 $/ 当前输入记录分隔符,默认情况是新行 $: 字符设置...

该程序是为方便查询perl函数所做的，其主要功能就是输入函数名称即可查询该函数的详细用法 其原理是使用perl对ACCESS数据库查询来寻找需要的资料 程序虽然简单，但却很实用，特别对于新学perl的人，可以对他们的perl学习带来方便。 在这里发布出来是希望能有更多的人来完善它，目前该程序只是完成了基本的查询功能，而数据库中的数据则只是演示之用。 还缺少的东西： 对程序本体，目前只有命令行的界面，希望有人能完成图形界面 数...

各位大家好！我是个新手刚在入门，请教一个简单的问题. 我写一个脚本,里面内容是：（脚本名字为 try11.pl） #!/usr/bin/perl -w my @infor=stat $ARGV[0]; foreach(@infor){ print"$_.\n"; } 执行命令： ./try11.pl myname.txt 显示结果为： 2051. 35930296. 33261. 1. 0. 0. 0. 201. 1215585282. 1213346769. 1213346769. 4096. 8. 其中有一个值是 元素$mode 的对应值！请问是哪个数？并且从该值如何看出它是0755？ ---------...

哪里有电子版perl函数库、标准perl库，请告诉一声，先谢了！

1.perl如何进行类型转换(如整数转化成字符串). 2.perl利用如何一个字符串由数字组成的. 项目中急用,请高手传授一下.

在copy中调用了_ckftp，但是调用的时候只给了两个参数，为什么在_ckftp中可以shift三次呢？是不是调用的时候第一个参数是系统给的什么东西？ sub _cktftp { ### ### -- Check tftp arguments my($self) = shift; my($addr) = shift; my($file) = shift; } sub copy { ### ### -- Copy a running-config to a tftp server file my($self) = shift; my($addr) = shift || return undef; my($file) = shift || retur...

我想在BEGIN函数里面初始化很多我的变量，但是我又使用了strict , 所以在执行完BEGINH后所有的初始化变量全部都会没有定义，请问如何在一个函数内导出这些值?????