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

代码片段 8064

#Lua
cocos2dx配置信息保存

getpref = overloaded() function getpref.string.number(key,defaultVal) local userdata = CCU…

lua
2015-12-14 235

#Perl
调用perl,Mail::Sender模块发送邮件

#!/usr/bin/perl use Mail::Sender; #new一个sender,定义编码格式防止乱码 my $sender = new Mail::Sender{ c…

2015-12-14 705

#Perl
perl遍历所有文件并修改或插入相关信息

#!/ms/dist/perl5/bin/perl5.10 use Tie::File; use strict; use warnings; sub process{ my @li…

2015-12-14 149

#Perl
递归遍历文件夹统计文件的行数

#!/usr/bin/perl $pwd="/home/program/"; $wc_temp="$pwd/wc_temp"; sub sum{ my @file=<*>…

2015-12-14 671

#Perl
连接MySQL 读取表内容

#!/usr/bin/perl # ppm install DBD::mysql use DBI; # use strict; my $dbname = "test"; my $l…

2015-12-14 842

#Perl
Perl练习——九九乘法表

#! perl -w use strict; use Win32::OLE; use Win32::OLE::Const 'Microsoft Excel'; $Win32::OL…

2015-12-14 691

#Perl
多线程子域名 bruteforcer – dnsspider

#!/usr/bin/env python # # dnsspider.py - multithreaded subdomain bruteforcer # # bruteforc…

2015-12-14 378

#Perl
Perl 列出所有 DBI 驱动程序

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

2015-12-14 852

#Perl
自动从ftp下载文件(不回显输入密码)

#!/usr/bin/perl #=========================================================================…

2015-12-14 219

#Perl
Perl 添加 Windows 系统帐号

#!/usr/bin/perl -w use Win32::NetAdmin; $host = ''; $username = "userName"; $password = "p…

2015-12-14 753

#Perl
Perl Socket server waiting for clients

use IO::Socket; $server = IO::Socket::INET->new ( LocalPort => 1247, Type => SOCK…

2015-12-14 918
1 77 78 79 80 81 672