/plus/list.php?tid=33 linux / Linux编程 / Perl编程 zh-cn www.linuxmine.net.cn -- 全球中文linux门户 admin@youremail.com /html/linux/xitongguanli/Perlbiancheng/20080823/68396.html 欢迎进入Linux社区论坛，        linux自负设备驱动程序的编写是嵌入式学院<嵌入式工程师职业培训班>三期课程中嵌入式linux驱动开发方面的重要内容，这里我们先对QT做一下简单介绍。        一、Li 2008-08-23 Perl编程 秩名 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20080615/66948.html 看了一天bugzilla课件和视频，周五开始搭bugzilla，现在把搭建过程中出的一些问题和解决方法大概的记一下。 搭建环境是在linux下，在Vmware中装Debian+Apache+mysql+bugzilla。 装Vmware和Debian这里就不说了，与普通的虚拟机和Linux安装没啥区别。 装好后用wget在 2008-06-15 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20080615/66947.html Perl对MySQL的支持借助DBI/DBD客户接口而提供。见20.5 MySQL Perl API。Perl DBD/DBI客户代码要求Perl 5.004或以后版本。如果你有Perl的一个更旧的版本，接口将不能工作。MySQL Perl支持也要求你安装了MySQL客户编程支持。如果你从RPM文件安装MySQL，客户程序在客户RPM 2008-06-15 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20080428/65261.html 数据存储是计算机编程中常见的问题。CPAN Persistent 类通过一个简化数据创建、检索和管理的通用接口，使数据存储变得简单。通过面向对象的方法，可以在项目中将 Persistent 类作为自己的数据类的父类透明地使用。 持久性介绍 所有程序员都有必须解决数据持久性问题的 2008-04-28 Perl编程 秩名 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20080428/65260.html cfengine（配置引擎）是一种 UNIX 管理工具，其目的是使简单的管理的任务自动化，使困难的任务变得较容易。它的目标是使系统从任何状态收敛（convergence）到一种理想状态。依照它的作者 Mark Burgess 所说，cfengine 总是使您的系统更接近于您所定义的配置； 它决不会 2008-04-28 Perl编程 秩名 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20080428/65259.html 作为系统程序员，您习惯性地使用命令行界面。可能您已不了解用轻量级图形用户界面（graphical user interface，GUI）来包装现有的功能是多么地容易。新发布的 Perl/Tk 及时地提醒您高质量有时候伴随着易用性。 您可以把精力集中放在高产量的服务器端编程上，而有时仍然 2008-04-28 Perl编程 秩名 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51349.html 设计程序的用户界面可能很困难而且耗时。Teodor Zlatanov 讨论了如何使用 Parse::RecDescent 模块来用简单的英语创建用户界面文法。他还展示了向程序添加功能或从程序除去功能时，更改文法是如何的方便。另外还与标准的 CLI 解析器和 GUI 进行了比较，讨论了这种方法的 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51348.html 开始之前 为实现本文的目的，您的系统最好安装了最近的主流（2000 或更新）UNIX（Linux、Solaris、BSD）。这些示例在 Perl 和 UNIX（以及其它操作系统）的早期版本上也可以运行，但是它们功能方面的障碍应该由读者作为练习来解决。给定的特定示例是用于 Red Hat Linux 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51347.html 准备工作: 用到的perl 扩展组件(modules)在上篇贴出.( win32::odbc 模块 )下载组件后按照Readme文件安装倒响应目录.配置好相应的odbc数据源. 程序实现: 使用 use Win32::ODBC; 语句包含应使用的模块是win32::odbc,写出数据库连接字符串 $DSN = "DSN = My DSN;UID = sa; 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51346.html 1. 介绍性指南 mod_perl 是个庞大而复杂的工具，它内建了许多模块帮助你方便地构建动态网站。这篇指南的目的是帮助你构建一个良好的 mod_perl 模块，并从中理解 mod_perl 的实现技术。我并不推荐使用这里介绍的技术来建立一个大型站点，尤其对于一个刚刚涉足 mod_perl 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51345.html 作为系统程序员，您习惯性地使用命令行界面。可能您已不了解用轻量级图形用户界面（graphical user interface，GUI）来包装现有的功能是多么地容易。新发布的 Perl/Tk 及时地提醒您高质量有时候伴随着易用性。 您可以把精力集中放在高产量的服务器端编程上，而有时仍然 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51344.html Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel 在 2000 年，Takanori Kawai 和 John McNamara 编写出了 Spreadsheet::WriteExcel 和 Spreadsheet::ParseExcel 模块并将它们张贴在 CPAN 上，这两个模块使得在任何平台上从 Excel 文件抽取数据成为可能（尽管不容 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51343.html 如果您的机器上已经安装了 Perl 5.005 或者更高的版本，您可以运行一下文章中的例子。您的系统最好应该是安装了最近的（2000 年或者更迟些）主流的 UNIX（Linux，Solaris，BSD），但其它种类的操作系统可能也可以。文中的例子可能可以在更老的版本的 Perl、UNIX 以及其 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51342.html 作者：Teodor Zlatanov 优化机器来满足需要 为面向 Java 和 Perl 的编程环境定制了 tcsh、Enlightenment、Eterm 和 Emacs 后，Teodor 为我们展示了他桌面的 Linux 配置。这是为 Java 和 Perl 编程设置优化的，但毫无疑问，其他程序员也会在其中发现许多有用的窍门。 几 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51341.html 脚本 perl以其功能强大和可伸缩性而闻名，下面的示例并没有做任何实际的工作，而只是显示了perl的一些特性。 #!/usr/bin/perl -w #sample perl program #scalar variables names start with $ $a=2; $b=3; print $a**$b，"n"; $hello_world='Hello World'; print $hel 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51340.html winnie.chan=Winnie Chan= tom.chow=Tom Chow= frankie.chow=Frankie Chow= 这档案的意义就是说当在数据中如果遇上 Frankie Chow 就把它转换成 frankie.chow ，另外当遇上 Peter wong 就把它转换成 peter.wong 。 另外有一文件名为 test.ldif ，读者可以先把它看成一个 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51339.html 受影响的软件及系统： ================== Microsoft Windows NT 4.0 Microsoft Windows 2000 Microsoft Windows XP 综述： ===== NSFOCUS安全小组发现微软Windows系统的Multiple UNC Provider（MUP）系统驱动中存在一个缓冲区溢出漏洞，本地攻击者可能利用 这个漏洞导 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51338.html Perl 解释器 初学者马上就会发现 Perl 中似乎没有任何编译器。事实上，Perl 脚本大多是由 Perl 解释器直接运行的，例如 UNIX 系统下的 "Perl"、DOS/Windows 下的 "perl.exe" 就是 Perl 解释器。而在 MacOS 中则不需要这些解释器。您可以试试看如何运行 Perl 脚本。首先 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51337.html 错误所带来的麻烦 软件开发人员通常都低估了软件测试的重要性。这一现象的根本原因很简单：处理错误很困难！因为错误往往暴露了代码的根本缺陷，所以有时候开发人员甚至会为了几个错误而从头开始重新编写项目的主要部分。 我认为，调试如此重要，以至于至少要为其分配 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51336.html UNIX 系统管理总是一个棘手的问题，运用正确的工具会使这个问题变得容易。在这一部分中，Teodor 提出了关于使用 Perl 来简化和牢固系统管理的想法。在这种环境中，系统配置引擎 cfengine 是一个极其重要的工具。 要完成本文中的练习，系统中必须安装了 Perl 5.6.0。操 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51335.html JAPH：“Just another Perl hacker” 据我们所知，JAPH 格式是在二十世纪九十年代由 Randal Schwartz 推广的（好几处信息来源都同意这个说法）。今天，JAPH 到处可见，它们是由该流派的那些不知疲倦的艺术家们制作的，比如 comp.lang.lang.perl.misc 新闻组的 Abigail 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51334.html 打开文件的常用方法是: open(FH, " $filename") or die "Couldn't open $filename for reading: $!"; open() 函数通常带有两个参数，第一个为文件句柄，用于指向打开的文件， 第二个参数是文件名及模式(文件的打开模式)的混合体，如果文件被成功打开， open()函数返回t 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51333.html 为了更好的控制文件的打开方式，可以使用 sysopen() 函数： use Fcntl; sysopen(FH, $filename, O_RDWR|O_CREAT, 0666) or die "Can't open $filename for reading/writing/creating : $!"; 函数 sysopen() 带有四个参数，第一个是同open()函数类似的文件句柄参数， 第 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51332.html 有一个容易的方法读入filehandles：用 操作符。在标量内容下， 它返回文件中的下一个记录，或者返回未定义出错信息。我们可以使用它来把一行读 入到一个变量中： $line = ; die "Unexpected end-of-file" unless defined $line; 在循环语句中，我们可以这样写： while 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51331.html Perl 是一门非常灵活的语言，然而，其易用特性会使程序员滋生出一种懒散的编程习惯。我们应该对这些坏习惯负责，同时可以采取一些快捷步骤来提高 Perl 应用程序的性能。在本文中，我们将介绍优化的一些关键内容，了解哪些解决方案有效、哪些无效，以及如何继续构建并扩 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51330.html 本文主要介绍Tomcat4.0.6和Tomcat4.1.18两个版本下数据库连接池的配置，及程序对连接池的JNDI查找，并提供相应测试代码。最后指出配置及应用过程中的常见问题及解决方法。 一、Tomcat简介 Tomcat是Apache Jakarta的子项目之一，是Sun公司推荐的JSP、Servlet容器。作为 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51329.html 本文将介绍系统管理的两个不同层次。Unix Power Tools，Shelley Powers、Jerry Peek、Tim O'Reilly 和 Mike Loukides 著，采用一种简单易读的方式介绍了系统管理的基本知识，这对于系统管理人员来说是一本必读书籍。Analytical Network and System Administration，Mar 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51328.html Perl 6 终于即将面世。在本文中，Ted 将向您介绍 Perl 6 语言的语法和正则表达式，并将它们与当前可用的 Perl 5 Parse::RecDescent 模块进行对比。认识 Perl 正则表达式的新特性，并学会如何具体使用新奇而又功能强大的 Perl 脚本语言。 对所有 Perl 编程人员而言，Per 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51327.html 请关注 Ion 窗口管理器这个功能强大却很简单的程序，可以用它来管理应用程序在桌面上调用的窗口。Ion 并非华而不实，一旦习惯了它，您的工作效率将因此得到极大的提高，而且您会感到奇怪：为什么以前还使用过其他窗口管理器。 通过本专栏，您将体验 X Window System 的 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51326.html cfengine（配置引擎）是一种 UNIX 管理工具，其目的是使简单的管理的任务自动化，使困难的任务变得较容易。它的目标是使系统从任何状态收敛（convergence）到一种理想状态。依照它的作者 Mark Burgess 所说，cfengine 总是使您的系统更接近于您所定义的配置； 它决不会 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51325.html 数据存储是计算机编程中常见的问题。CPAN Persistent 类通过一个简化数据创建、检索和管理的通用接口，使数据存储变得简单。通过面向对象的方法，可以在项目中将 Persistent 类作为自己的数据类的父类透明地使用。 持久性介绍 所有程序员都有必须解决数据持久性问题的 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51324.html 在编制PERL程序时，经常会用到很多相似的HTML代码。这样不但书写起来会很麻烦，而且一旦要改动页面，而程序很大，那就更麻烦了。 解决这样的问题一个好的方法就是使用模板。通常的模板使用方法有两种： 一种是将固定部分的HTML代码提取出来生成模板文件，不同的部分在 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51323.html 早闲来无事，我也说说编写不刷屏的聊天室。 首先要说，编写真正好的聊天室已经超出了CGI的范畴，要求不仅对语言而且对操作系统和网络协议有一定的了解，需要一些经验的积累。简单的说就是编写端口守护程序，这里牵扯到socket编程，进程间交互，（二者都是比较古老的技 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51322.html 如果你调用，返回文件中剩余的记录。如果你处于文件尾，则返回空表： @records = ; if (@records) { print "There were ", scalar(@records), " records read.n"; } 在下面的一步中，进行赋值和测试两项工作： if (@records = ) { print "There were ", scalar(@recor 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51321.html 我的前两篇关于使用 Perl 实现遗传算法（GA）的文章（参阅 参考资料）讲述的是个体细胞的变异与生命周期，它的适合度（fitness）完全依赖于它们自己的 DNA。本文将介绍如何仿真一个多细胞机体。具体的应用程序将会生成由其复杂性和正确性决定的字谜（letter puzzles） 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071101/51320.html 就像大家从以前的文章里看到的，mod_perl nbsp;使Apache由两个组件组成： nbsp;Perl nbsp;模块和 nbsp;Apache nbsp;本身。虽然以非超级用户权限安装Apache很简单，但是应该知道如何安装在非系统位置的Perl模块。本文我将论证几种方法来实现这个任务。 在这些例子里，我 2007-11-01 Perl编程 Perl编程 Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50957.html 原文： 11. How do I get a Canvas to ... ? The Canvas widget is the most configurable and versatile. With versatility comes complication however, and it is certainly deserving of its own special section within this FAQ... You might also see the examp 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50956.html 原文： 10. How do I get widget X to do Y ? There are a number of tasks that can be accomplished with perl/Tk widgets, configurations, and bindings (a few that can't and a few that require specific tricks). Beginners are encouraged to work through th 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50955.html 原文： 10.1. How do I get a Button to call a Perl subroutine? You may specify the -command option in the call to create gt;Button(-text = 'Print', -command = sub{do_print($filename, $font)} )-pack; Where sub do_print { } is a subroutine that handles 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50954.html 原文： 10.2. How do I get a Button to actively change under my mouse pointer? You should specify both an '-image' and an '-activeimage' configuration option either when calling the -Button() method or in a later separate call to the -configure() met 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50953.html 原文： 10.3. How do I arrange the layout of my widgets? To control the layout and appearance of widgets in a window one makes use of a geometry manager, as well as -padding, -fill, -expand, and -anchor options of individual widgets. A geometry manag 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50952.html 原文： 10.4. How do I get a Popup to popup? For things like a simple "are you sure?" dialog box you might want to take a look at Dialog.pm which is discussed in a later question within this FAQ [16.1]. If you don't wish to require Tk::Dialog, you ne 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50951.html 原文： 7. Where is the Documentation? A great deal of Perl/Tk documentation gets installed as part of the Tk extension building process. Hence, a great deal of documentation is probably residing on your computer already. More documentation is "in th 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50950.html 原文： 8. How do I write scripts in perl/Tk? Start your script as you would any perl script (e.g. #!/usr/bin/perl, #!/usr/local/bin/perl, #!/opt/bin/perl, [built static? then #!/usr/bin/tkperl], whatever, see the perlrun(1) man page for more informa 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50949.html 原文： 9. What widget types are available under perl/Tk? The following Tk widget primitives are available under perl/Tk: Button Canvas Checkbutton Entry Frame Label Listbox Menu Menubutton Message Radiobutton Scale Scrollbar Text Toplevel The follow 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50948.html 原文： 6. How do I build it? Assuming you are not running a binary distribution then, in general, building perl/Tk requires: 1. A made lt;kjahds@kjahds.com. If any of the following does not say "dl_none.xs" then you probably do have dynamically link 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50947.html 原文： 5. What/Where isCPAN? "CPAN" = Comprehensive Perl Archive Network a worldwide collection of anonymous ftp sites for Perl et al (not to be confused with CTAN which is for TeX, nor CSPAN which rarely deals with computer software). The files of 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50946.html 原文： 2. What is the difference between perl/Tk and Tkperl? [OBSOLETE; move to historical section.] TkPerl was originally the name of a (now unsupported) perl 4 package that Malcolm Beattie mailto:mbeattie@sable.ox.ac.uk at Oxford University gave t 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50945.html 原文： 3. Do I need Tcl/Tk in order to build Perl/Tk? Short answer: No not at all. Perl/Tk is completely independent of Tcl/Tk. Longer answer: In order to build Perl/Tk from source code you do need a recent version of perl, the perl/Tk source code k 2007-10-30 Perl编程 perl Linux宝库 /html/linux/xitongguanli/Perlbiancheng/20071030/50944.html 原文： 10.6. How do I add bindings? On Fri, 15 Sep 95 10:30:56 BST Nick Ing-Simmons Nick.Ing-Simmons@tiuk.ti.com writes: Re: Multiple binds to a single widget?**************************************On Thu, 14 Sep 1995 14:57:54 -0400Alain St astdenis@ 2007-10-30 Perl编程 perl Linux宝库