随笔分类 -  Perl/php

1
摘要:一,基于单纯的密码验证的情况:1.安装Net::SSH::Perl模块,安装方法参照Perl模块安装。2.自动登录例子,我要用testuser用户登陆到服务器192.168.0.100执行df命令:#!/usr/bin/perl -wuse strict;use Net::SSH::Perl;my $host = '192.168.0.196';my $user = 'root';my $password = 'pass';my $ssh = Net::SSH::Perl->new($host);$ssh->login($user,$ 阅读全文
posted @ 2011-12-14 10:28 大力 阅读(3598) 评论(1) 推荐(0)
摘要:PHP一直提示不能创建临时文件,定义了 php.ini 里的 upload_tmp_dir ="C:\WINDOWS\Temp\" 无效,改成upload_tmp_dir ="C:\WINDOWS\Temp\php\" 后正常,无语。。。 阅读全文
posted @ 2011-10-24 22:30 大力 阅读(1874) 评论(0) 推荐(0)
摘要:printf()函数优点在于可以格式化输出!格式如下:%['padding_character][-][width][.precision]type所有的转换说明都是以%开始,如果想打印一个%符号,必须用%%.参数'padding_character是可选.它将被用来填充变量直至所指定的宽度.该参数的作用就在变量前面填充.默认的填充字符是一个空格,如果指定0或者空格,就不需要 ' 单引号作为前缀,... 阅读全文
posted @ 2010-07-24 22:28 大力 阅读(2233) 评论(0) 推荐(0)
摘要:主要PHP没有一个好的断点调试工具,上上个星期用VS.php,发现调试简单的页面还可以,如果调式复杂一点项目经常出错退出。上个星期改用Komodo IDE,这东西比VS.php好用点,不过也经常自动跳出。.net几分钟可以做完的事,php要几十分钟。郁闷死了。。。。 阅读全文
posted @ 2010-06-13 10:14 大力 阅读(514) 评论(1) 推荐(0)
摘要:搜索了下可以像这样指定MYSQL的参数类型,看到一老外像这样写,,这个,看起来怪怪的表23-1 bind_param第一个参数字符描述字符种类代表的数据类型IintegerDdoubleSstringBblob 阅读全文
posted @ 2010-05-30 02:00 大力 阅读(685) 评论(1) 推荐(1)
摘要:要统计广告的弹出次数,找不到这种IIS日志分析器,只好写了个脚本。以上脚本生成以下表格202.100.121.461209123.180.14.253185222.90.15.209179 阅读全文
posted @ 2010-05-25 14:39 大力 阅读(446) 评论(0) 推荐(0)
摘要:<?php//include_once("Smarty/libs/Smarty.class.php"); require_once $_SERVER['DOCUMENT_ROOT']."/Smarty/libs/Smarty.class.php";$smarty=new smarty(); $smarty->compile_check=true;$smarty->config_... 阅读全文
posted @ 2010-05-07 15:01 大力 阅读(723) 评论(0) 推荐(0)
摘要:map用法示例2 1.转换文件名为文件大小 @sizes=map{-s$_}@file_names; -s是个文件测试操作符,它返回某个文件的size。所以上面这句就返回@file_names数组里每个文件的大小,结果也是个数组。 2.转换数组到hash:找到某个数组值的索引 代替重复的搜索数组,我们可以用map来转换数组到hash,并通过hash关键字来进行直接查找。如下的map用法相对于重复的... 阅读全文
posted @ 2010-04-22 18:05 大力 阅读(444) 评论(0) 推荐(0)
摘要:[root@mail lcx]# ./p.pl /lcx \.txt$ '\s+\d.+$' ''perl -p -i.bak -w -e 's/\s+\d.+$//g' /lcx/a/a.txtperl -p -i.bak -w -e 's/\s+\d.+$//g' /lcx/a/b/xxx.txthttp://search.cpan.org/~jesse/perl-5.12.0/lib/Fil... 阅读全文
posted @ 2010-04-21 17:31 大力 阅读(181) 评论(0) 推荐(0)
摘要:昨天用System.Net.Sockets来检查服务器的80端口是否正常,但是它无法控制连接到主机的超时时间,按MSDN说法,好像只能控制Send 调用超时时间,没有找到连接超时时间设置,这样造成了当程序连接到一个没有开放80端口的IP时要等待十多秒,程序变得非常缓慢。Socket 成员:http://msdn.microsoft.com/zh-cn/library/system.net.sock... 阅读全文
posted @ 2010-04-10 11:57 大力 阅读(476) 评论(0) 推荐(0)
摘要:KomodoEdit 5.22发布时间 03-Nov-2009 10:55下载地址  这次发布的新版本与上个版本(5.21)类似,没有在功能上有大的改变,所以在体验上不会有很大差别。详细修正的BUG请参照这里。  语言包在细节方面与之前有些许不同,我并没有测试原来的语言包是否适合现在的版本,所以如果你的旧版本语言包可以正常使用,那么就无需再下载这个语言包了。  下载的同时请注意,Komodo ID... 阅读全文
posted @ 2010-01-27 14:11 大力 阅读(2039) 评论(0) 推荐(0)
摘要:9 Perl 中的正则表达式正则表达式的三种形式 正则表达式中的常用模式 正则表达式的 8 大原则   正则表达式是 Perl 语言的一大特色,也是 Perl 程序中的一点难点,不过如果大家能够很好的掌握他,就可以轻易地用正则表达式来完成字符串处理的任务,当然在 CGI 程序设计中就更能得心应手了。下面我们列出一些正则表达式书写时的一些基本语法规则。-----------------------... 阅读全文
posted @ 2010-01-25 16:13 大力 阅读(538) 评论(0) 推荐(0)
摘要:1、perldocperllocal2、推荐pmtools里的pminst命令 http://search.cpan.org/src/MLFISHER/pmtools-1.01/pminst3、编写如下标本#!/usr/bin/perluse strict;use ExtUtils::Installed;my $inst= ExtUtils::Installed->new();my @mo... 阅读全文
posted @ 2010-01-25 10:18 大力 阅读(1118) 评论(0) 推荐(0)
摘要:Perl原名pearl,但是在这个语言官方发表前,拉里·沃尔发现已经有个编程语言“pearl”,便将这个编程语言的名字改成Perl。对于Perl这四个字母,有一些解释,包括充满幽默感的“Pathologically Eclectic Rubbish Lister”。“Practical Extraction and Repo... 阅读全文
posted @ 2010-01-08 21:29 大力 阅读(375) 评论(0) 推荐(0)
摘要:#最近做东西老用到处理时间的问题,索性写几个函数。#!/usr/bin/perl -w#===============================================================================# Copyright (c) 2009, # All rights reserved.# 摘 要 :一些常用的时间处理函数# 作 者 :2009-12-... 阅读全文
posted @ 2010-01-07 19:23 大力 阅读(983) 评论(0) 推荐(0)
摘要:中文安装:一、解压eclipse-SDK-3.3-win32.zip到本地磁盘,打开eclipse.exe,待Eclipse启动后依次点击菜单 help->Software Updates->find and install,在出现的Install/Update对话框中选择‘Search for new features to Install’后点击Next。 ... 阅读全文
posted @ 2010-01-07 10:57 大力 阅读(639) 评论(0) 推荐(0)
摘要:日志滚动,获取 tail -f 里的信息 如果 存在“Too many open files”那么重启apache 设置开机运行 [root@2082 etc]# vi rc.local su root -c "/usr/bin/perl /lcx/reapache.pl &" 阅读全文
posted @ 2010-01-05 13:55 大力 阅读(669) 评论(0) 推荐(0)
摘要:[代码]刚学perl会这样写,前段时间有空翻了下电子书,发现perl里的glob 。。。。perl是我见过最强的文本处理语言。@html_file=glob '/home/site/*.html';@three_letter_extensions=glob '*.???';@lcfirst=glob '[a-z]*';@files=glob 'file[0-9][0-9][0-9]';@files... 阅读全文
posted @ 2009-11-05 12:05 大力 阅读(6245) 评论(0) 推荐(0)
摘要:[代码]说明:[a-zA-Z1-9]{1} \w* (\-{0,1}\w{1})* (\.{0,1}\w{1})* [a-zA-Z1-9]{1,} @ ( [a-zA-Z1-9]{1,} \-* \.* [a-zA-Z1-9]{1,} )+\. [a-zA-Z]{2,8}.net正则里不能用于perl:http://www.cnblogs.com/LCX/archive/2008/07/16/12... 阅读全文
posted @ 2009-10-28 08:39 大力 阅读(242) 评论(0) 推荐(0)
摘要:今天来看看标量的操作符,标量可以分为两类:一类是数字,另一类是字符串。在perl中这两类数据可以相互转化,但是操作还是有区别的。   下面先介绍数字类型的操作符:   数字类型的运算操作符有一下几种:   +(加),-(减),*(乘),/(除),-(取反)。  不会的举手,好没有。  下面讲一些难的。   第一个是“%”(取余)。嗯,会C语言的可以退场。这个操作符的使用方法... 阅读全文
posted @ 2009-10-24 22:30 大力 阅读(547) 评论(0) 推荐(0)

1