搜索博文结果_ChinaUnix博客

博客首页博客专家往日推荐博客文集

热搜：网络安全 cISCO 服务器 Oracle MongoDB WINDOWS Hyper-V FTP

博客首页〉搜索结果

按类别查询搜索结果

操作系统程序设计数据库热点技术综合架构与运维移动开发与应用 Web前端

关于关键词的检测结果，共 64 条

【PERL】 Perl Cookbook----1.10 把Unicode字符串作为八字节字符处理

wand65 | 2014-01-20 11:33:47 | 阅读(650) | 评论(0)

1.10.1 问题描述你有一个Unicode的字符串，但是希望Perl按照八字节方式处理（例如，计算字符串长度或是对I/O的使用上）1.10.2 解决方案使用“use bytes”编译符可以使perl在词法作用于内的操作将字符串按照八字节处理。当你的代码直接调用perl的对字符不敏感的函数时，可以用这个编译符号$ff = "\x{FB00}...【阅读全文】

【PERL】 Perl Cookbook----1.6 一次处理字符串的一个字符

wand65 | 2014-01-10 16:40:12 | 阅读(350) | 评论(0)

perl cookbook 1.6 一次处理字符串的一个字符【阅读全文】

【PERL】．管辖的分类

zhiyue5654 | 2013-12-27 22:42:38 | 阅读(440) | 评论(0)

被告住所地合同履行地合同签定地原告住所地合同标的物所在地地法院? 只限于审民事纠纷案件中的合同案件? 不能改变专属管辖和级别管辖的规定管辖? ．管辖的分类? ...【阅读全文】

【PERL】决议无效及表见决议决议不存在的处理

zhiyue5654 | 2013-12-14 13:19:24 | 阅读(650) | 评论(0)

他人以与原告相同理由请求参加诉讼的应当列为共同原告决议无效及表见决议决议不存在的处理股东会或者股东大会董事会决议存在下列情形之原告起诉请求确定相关决议无效或者部分内容无效的人民法院应予以支持股份有限公司未召集股东大会即形成股东大会决议有限责任公司...【阅读全文】

【PERL】 Perl 处理excel时中文的解决办法

murdercool | 2013-12-13 10:21:04 | 阅读(0) | 评论(0)

老有人问我 excel 中文乱码的问题，我平时很少接触这一块，每次都得从头研究，现在把结论记录在这里，以做备忘。读：use strict;use warnings;use Spreadsheet::ParseExcel;use MyExcelFormatter;my $file = 'foo.xls...【阅读全文】

【PERL】是实现审计目标的基础

zhiyue5654 | 2013-11-28 13:57:01 | 阅读(510) | 评论(0)

审计证据：是实现审计目标的基础，它是指注册会计师为了得出审计结论，形成审计意见而使用的所有信息，包括财务报表依据的会计记录中含有的信息和其他信息.按其外形特征可分为：实物证据书面证据口头证据环境证据按审计取证工作的顺序归纳，包括顺差法及逆差法；按审计取证审查的数量归纳，包括详查法和抽查法；按审计取证...【阅读全文】

【PERL】或区域管辖

zhiyue5654 | 2013-11-15 14:14:08 | 阅读(250) | 评论(0)

　　.地域管辖：又称土地管辖，或区域管辖，它是以人民法院的辖区和案件的隶属关系确定诉讼管辖的，亦即确定同级人民法院之间在各自的区域内受理第审民事案件的分工和权限。　　.般地域管辖：又称普通管辖，是指以被告住所地为标准来确定受诉法院。采取原告就被告的原则。　　.特殊地域管辖：是指...【阅读全文】

【PERL】的範圍應作廣義的理解本法條款規定&ldquo

zhiyue5654 | 2013-11-03 10:07:59 | 阅读(230) | 评论(0)

本條規定比較人性化突出體現了對勞動者權益受侵害情形予以法律救濟的思想在理解上應當注意包括以下層涵義首先勞動者的合法權益受到侵害的包括各種各樣的情形與本法條相呼應勞動行政部門對實施勞動合同制度進行監督檢查的事項往往就是勞動者的合法權益容易受侵害的地方例如用人單位制定規章制度的內容或者程式不合法損害到...【阅读全文】

【PERL】 perl的字符串处理函数实例讲解

nyzhj05 | 2013-10-17 15:24:39 | 阅读(1040) | 评论(0)

1. indexposition = index (string, substring, position)返回子串substring在字符串string中的位置，如果不存在则返回-1。参数position是可选项，表示匹配之前跳过的字符数，或者说从该位置开始匹配。例子如下：[root@localhost ~]# echo -n '/var/fap/test/123' | perl -ne '$rev=index($_, "a"); print ...【阅读全文】

【PERL】 perl处理excel中文报错“Wide character in print ……”

wangjj20 | 2013-09-25 17:13:45 | 阅读(4270) | 评论(0)

今天使用perl处理excel文件，里面有包含中文字符，需要导入到数据库。导入到是正常，不过打印出中文列报错“Wide character in print ……” 网上搜索了下，可以使用如下方法：输入输出utf8化----------------------- use utf8;binmode(STDIN, ':encoding(u...【阅读全文】

【PERL】平时的一些练习7(后续整理)

murdercool | 2013-09-10 17:13:36 | 阅读(0) | 评论(0)

#!/usr/bin/perl#grep练习#@a=qw(1 2 3 4 5 64);#@c=grep {$_=~/4$/} @a; #代码块形式 #@c=grep $_=~/4$/, @a; #表达式形式#print "@c","\n"#map联系#@a=qw(1 2 3 4 5 64);#@c=map {$_+100 }@a;#print "@c","\n" #my $a=int rand(100);#print $a,"\n";#while(1){# my $b=<STDIN>;...【阅读全文】

【PERL】平时的一些练习6(后续整理)

murdercool | 2013-09-10 17:12:43 | 阅读(0) | 评论(0)

#!/usr/bin/perl#system(rm,"-i","out.unl"); #sub choose{# # my $file=$_[0];my $s1=$_[1];my $s2=$_[2];my $s3=$_[3];my $diff=$_[4];# my (@arr_name_1,@arr_name);# # open (my $fh1 ,"$file")||die("open error");# @arr_name_1=();# ...【阅读全文】

【PERL】平时的一些练习5(后续整理)

murdercool | 2013-09-10 17:10:37 | 阅读(0) | 评论(0)

#!/usr/bin/perl#use warnings;#use strict;# 求平均值和中间值#####求平均值####sub avg{#### my(@a)=@_;#### my $sum;#### foreach $a(@a){#### $sum+=$a;#### }#### $avg=$sum/@a;#### return $avg;#### }##### 求中间值####sub ...【阅读全文】

【PERL】平时的一些练习4(后续整理)

murdercool | 2013-09-10 17:09:09 | 阅读(0) | 评论(0)

#!/usr/bin/perl#$a=$a*89;#$b=$b+1+1;#print "$a\n"; #print "$b\n"; #$a="john";#print 'i am $a' ."\n"; #print "i am $a \n" ; #print "i am \$a \n" ; &nb...【阅读全文】

【PERL】平时的一些练习3(后续整理)

murdercool | 2013-09-10 17:07:45 | 阅读(0) | 评论(0)

#!/usr/bin/perl -w#BEGIN{unshift @INC,"./module"}#seek 移动指针 tell 确定指针位置#use strict;#open(A,"+<a.unl")||die("failed");#seek(A,5,0);#print tell(A),"\n";#print A 'SSS';#close(A)#open(my $fh1,"a.unl")||die("open failed");#while(<$fh1>){# if(/a/.../c/){# prin...【阅读全文】

【PERL】平时的一些练习2(后续整理)

murdercool | 2013-09-10 17:06:12 | 阅读(0) | 评论(0)

#!/usr/bin/perlBEGIN{print "Hi,welcome to perl !!\n"; unshift(@INC,"/home/wbcbp/wangx/a/perl_test/module") }; #perl加入脚本开头结束执行END{print "It\'s over!!\n"};##替换$string=~s/// 可带参数 g贪婪 o一次 s支持隔行匹配 i忽略大小写 x忽略模式中的空...【阅读全文】

【PERL】平时的一些练习1(后续整理)

murdercool | 2013-09-10 17:05:30 | 阅读(0) | 评论(0)

#!/usr/bin/perl#print "\Uabcd\Eabcd\n";#$a='abcd';#$a=~s/a/m/;#print $a,"\n"; #替换#substr($a,2,1)='d';#print $a,"\n"; ...【阅读全文】

【PERL】 perl字符串处理

iWonderLinux | 2013-07-11 11:04:48 | 阅读(1180) | 评论(0)

1. chop和chomp函数　　两个函数都以字符串作为参数，并去除其末尾最后一个字符。区别是，无论最后一个字符是什么，chop都会去除，并在返回值中返回；而仅当字符串最后一个字符与特殊变量$/保存的字符一样时，chomp才会将其去除。默认情况下$/保存换行字符，当然可以重设。　　1）如果函数参数是一个字符串数组，...【阅读全文】

【PERL】 perl遍历系统目录

grshrd49 | 2013-07-08 12:37:44 | 阅读(760) | 评论(1)

脚本功能类似于linux的find遍历目标目录下的所有目录以及文件，找到想要的文件与目录#!/opt/ActivePerl-5.12/bin/perluse strict;use Cwd;my $from_dir = shift @ARGV; #从什么目录开始查找my $tag = shift @ARGV; #要查找目录或者文件名&search($from_dir,$tag);sub search{my $source_dir = shift...【阅读全文】

【PERL】浅尝Perl文本处理

幸运啤酒盖 | 2013-07-04 11:14:09 | 阅读(2690) | 评论(0)

Perl 文本字符串处理【阅读全文】

首页
<<
1
2
3
4
>>
末页

网络110 报警服务