代码片段 - 第78页 - 遇见资源网

首页软件开发代码片段 ( Page 78 )

代码片段 8064

分类导航：

二级分类：

全部

三级分类：

css

lua

php

sql

#Lua
Lua中的table函数库

一部分的table函数只对其数组部分产生影响, 而另一部分则对整个table均产生影响. 下面会分开说明. table.concat(table, sep, start, end)…

lua

Lua

2015-12-14 741

#Perl
Recursive Find File In Directory

#!/usr/bin/perl -w use utf8; use strict; use warnings; sub lsrp { my ($dir, $sub, $ext, $p…

perl _

Perl

2015-12-14 964

#Perl
perl 多线程，实时监控线程数，支持max thread

#!/usr/bin/perl -w #Description:rerun eod job group by system #Auther:Suzm #Date :2015-06-…

perl _

Perl

2015-12-14 581

#Perl
FizzBuzzWhizz

#!/usr/bin/perl use strict; die "Wrong argument number\n" if @ARGV != 3; # print to file i…

perl _

Perl

2015-12-14 941

#Perl
防止网站被爬虫爬取的几种解决办法

#! /bin/bash LOGFILE=/var/log/nginx/access.log PREFIX=/etc/spiders #日志中大部分蜘蛛都有spider的关键字，但…

perl _

Perl

2015-12-14 500

#Perl
遍历当前目录的所有文件

#!perl # #Author：caryl # # use strict; use Cwd; use File::Spec; use File::Basename; open S…

perl _

Perl

2015-12-14 254

#Perl
把二进制翻译成中文/英文

#!/usr/bin/perl -w #use diagnostics; sub bin2cn{ die "Error:1001:bin2cn\n" if chop($_[0]) …

perl _

Perl

2015-12-14 318

#Perl
顺序查找

#!/usr/bin/perl use strict; use warnings; use feature qw(say); print "输入需要查找的元素："; my $obj…

perl _

Perl

2015-12-14 142

#Perl
Perl批量编译GCC源代码

#!/usr/bin/perl #use Cwd; sub CompileAll(){ local($dir) = @_; opendir(DIR,"$dir"|| die "ca…

perl _

Perl

2015-12-14 791

#Perl
Perl 列出所有 DBI 数据源

#!/usr/bin/perl use strict; use DBI; my @drivers; @drivers = DBI->available_drivers; fo…

perl _

Perl

2015-12-14 857

#Perl
Perl 的 Win32::Spawn 使用方法

#!/usr/bin/perl -w use Win32; #$ApplicationName = 'c:/winnt/system32/notepad.exe'; #$Appli…

perl

Perl

2015-12-14 591

#Perl
Perl 使用 XML::Simple 进行 XML 读写

use XML::Simple; my $simple = XML::Simple->new(); # initialize the object my $tree = $s…

perl

Perl

2015-12-14 533

上一页 1 … 76 77 78 79 80 … 672 下一页

如遇问题，请联系客服
联系客服请注明来意高端主题开发
微信公众号

总裁主题·高端主题
返回顶部

代码片段 8064

总裁主题

QQ交流群