自定义博客皮肤VIP专享

*博客头图:

格式为PNG、JPG,宽度*高度大于1920*100像素,不超过2MB,主视觉建议放在右侧,请参照线上博客头图

请上传大于1920*100像素的图片!

博客底图:

图片格式为PNG、JPG,不超过1MB,可上下左右平铺至整个背景

栏目图:

图片格式为PNG、JPG,图片宽度*高度为300*38像素,不超过0.5MB

主标题颜色:

RGB颜色,例如:#AFAFAF

Hover:

RGB颜色,例如:#AFAFAF

副标题颜色:

RGB颜色,例如:#AFAFAF

自定义博客皮肤

-+
  • 博客(24)
  • 资源 (11)
  • 论坛 (18)
  • 收藏
  • 关注

原创 与工作无关

http://tieba.baidu.com/p/2900094330

2014-03-05 12:44:52 498

原创 PERL LWP

#! /usr/bin/perl use LWP::Simple; use Encode; my $targetfile = "C:/Users/Administrator/Desktop/123.txt"; open(TARGETHANDLE, ">".$targetfile); my $url='http://www.baidu.com/s?wd=百度'

2013-05-08 15:48:14 678

原创 PERL - LWP::SIMPLE 使用

http://zhidao.baidu.com/question/530489692.html http://blog.chinaunix.net/uid/17135777/cid-1400-list-1.html

2013-04-02 14:54:56 840

转载 perl写入文件时中文乱码终极解决方案

perl写入文件时中文乱码终极解决方案在用perl写爬虫时,网页内容如果是英文可以正常写入文件,一旦网页中包含中文,文件是全部是乱码。可以网页的meta信息明明写着charset='utf8',并且我把网页内容直接输出到STDOUT也可以正常显示。尝试了很多方法都不行:open文件时指定utf8编码使用Encode::_to_utf8调用系统命令enca或iconv转码使用Un

2013-04-02 14:31:16 1469

原创 android插入联系人

private void insertContact(String serviceName, String serviceNumber) { //先插入空值得到rawContactId ,然后用于下面插值 ContentValues values = new ContentValues(); Uri rawContactUri = getContent

2013-03-19 15:02:21 699

原创 Android屏蔽home键

2.2版本 @Override public void onAttachedToWindow() { this.getWindow().setType(WindowManager.LayoutParams.TYPE_KEYGUARD_DIALOG); super.onAttachedToWindow(); } 4.0版本 publ

2013-03-12 10:26:37 1247

原创 perl把Excel一列复制

#!perl -wuse Win32::OLE qw(in with);my $file = "C:/Users/Administrator/Desktop/input.xls";my $fileOut = "C:/Users/Administrator/Desktop/output.xls";my $sheet = 1;#第几个页my $Row = 3;#你要取出的列

2013-02-28 14:27:31 1050

转载 perl连接SQLite

需要安装DBD::SQLite模块[root@localhost ~]# cat create_db.pl #!/usr/bin/perl -wuse strict;use DBI;my $db_file="data.db";#建立连接my $dbh = DBI->connect("dbi:SQLite:dbname=$db_file","","");

2012-11-29 12:20:57 1041

原创 perl分组捕获

问题如下 :http://zhidao.baidu.com/question/501928970.html?push=keyword 解决如下:#! /usr/bin/perl -wuse strict;my $string = "abc r=3 def r=3 test r=3 over";print $string , "\n";$string =~ s

2012-11-27 15:49:00 1928

原创 Perl GUI (未完待续)

use Win32::GUI;   use Win32::GUI qw(CW_USEDEFAULT);  use Win32::GUI::DIBitmap;   use Win32::GUI::DropFiles;   my $size = 20;    $W = new Win32::GUI::Window (               -title    => "

2012-11-19 10:32:00 863

原创 收藏个perl程序

http://zhidao.baidu.com/question/497767826.html?push=cookie

2012-11-14 23:30:21 379

原创 第一个perl程序

http://bbs.csdn.net/topics/390272012 帮完成了这个问题,收藏下use strict;use File::Find;use Getopt::Std;my @allcsvfile;my @targetfile;if($#ARGV == -1 ) { print "使用格式如下:perl list.pl 路径 关键字 >

2012-11-09 14:30:31 419

原创 perl基础-9 (Perl编程24学时教程)

#!usr/bin/perl -w$string = "one fish, two fish , three fish";$start = -1;while (($start = index($string, "fish",$start))!= -1){ print $start; print "\n"; $start++;}print rinde

2012-11-01 17:42:09 453

原创 perl基础-7 (Perl编程24学时教程)

#!usr/bin/perl -w#hash%hash1=("aaaa"=>1,"bbbb"=>2,"cccc"=>3,"dddd"=>4); foreach $key(sort keys %hash1) { print $key; print $hash1{$key}; print "\n"; } %hash2 = %hash1;

2012-11-01 17:38:07 521

原创 perl基础-4 (Perl编程24学时教程)

#!$s = 'test';@array1 = ("apple", "orange", 80, $s);@array2 = qw(apple orange 80 $s);print "@array1","\n";print @array1,"\n";print @array2,"\n";##################################

2012-10-29 19:53:21 510

原创 perl基础-2 (Perl编程24学时教程)

#!$radius =50;$area = 3.14*($radius**2);print $area ,"\n";##############################################if ('leon' =~ /\bleon\b/) {print ("I am leon!\n");}else {print ("who

2012-10-29 15:38:41 456

转载 perl正则表达式

perl正则表达式一、简介二、匹配操作符三、模式中的特殊字符1、字符2、字符 []和[^]3、字符 +,*和?4、转义字符5、匹配任意字母或数字6、锚模式7、模式中的变量替换8、字符范围转义前缀9、匹配任意字符10、匹配指定数目的字符11、指定选项12、模式的部分重用13、转义和特定字符的执行次序14、指定模式定界

2012-10-17 12:40:20 572

原创 JAVA学习正则表达式提取email

import java.io.BufferedReader;import java.io.FileNotFoundException;import java.io.FileReader;import java.io.IOException;import java.io.Reader;import java.util.regex.Matcher;import java.uti

2012-10-16 23:51:52 958

原创 基础知识2

require 'win32ole'excel = WIN32OLE::new('excel.Application')workbook = excel.Workbooks.Open('H:\rb\123.xls')worksheet = workbook.Worksheets(1) #定位到第一个sheetworksheet.Selecttemp = worksh

2012-10-08 18:13:07 365

原创 基础知识1

puts "hello "\ "world" if falseclass Person @@count =0 def initialize (name , age=18) @name = name @age = age @motherland = "china" end def talk

2012-10-08 18:11:48 384

原创 asynctask学习

先给上一张(mars老师教学用)图:注意上面asynctask主要成员函数所在的线程。

2012-08-18 22:07:35 525

原创 android退出activity提示再按一次返回键

@Override public boolean onKeyDown(int keyCode, KeyEvent event)//主要是对这个函数的复写 { // TODO Auto-generated method stub if((keyCode == KeyEvent.KEYCODE_BACK)&&(event.getAction() == KeyEvent.AC

2012-08-17 22:05:49 3118

转载 OAUTH协议简介

摘要:OAUTH协议为用户资源的授权提供了一个安全的、开放而又简易的标准。与以往的授权方式不同之处是OAUTH的授权不会使第三方触及到用户的帐号信息(如用户名与密码),即第三方无需使用用户的用户名与密码就可以申请获得该用户资源的授权,因此OAUTH是安全的。同时,任何第三方都可以使用OAUTH认证服务,任何服务提供商都可以实现自身的OAUTH认证服务,因而OAUTH是开放的。业界提供了OAUTH的

2012-08-16 10:11:00 416

原创 Java中的IO-Mars老师学习视频笔记

Java中IO的分类第一种分类:1.输入流(以java程序为参照物)                       2.输出流第二种分类:1.字节流(以字节byte读写为基础,使用同字符流如出一辙)                            Inputstream  -->Fileinputstream                             Oupu

2012-08-09 22:42:07 771

ActivePerl-5.14.2

ActivePerl-5.14.2

2012-12-14

Perl语言编程(清晰完整)

Perl语言编程(清晰完整)

2013-02-22

PERL 5.8.8

PERL 5.8.8

2012-11-29

camera系统中设置picture大小的流程分析

camera系统中设置picture大小的流程分析

2013-03-27

保存的perl代码

保存的perl代码

2012-11-23

perl2exe转换工具

perl转换为exe可执行文件,无需安装,解压即可!

2012-11-05

Ruby Eclipse插件

Ruby的Eclipse插件!解压拷入eclipse中即可使用了

2012-10-12

Linux设备驱动程序第三版.CHM

Linux设备驱动程序第三版.CHM

2013-05-13

Android应用开发揭秘(完整版)

Android应用开发揭秘(完整版)

2012-11-12

Perl编程24学时教程(pdf)

Perl编程24学时教程, pdf格式,你值得拥有!

2012-10-30

Perl语言入门(第六版)

perl经典入门教程

2012-11-05

android studio native开发请教

发表于 2020-09-25 最后回复 2020-09-25

cts verifier-9.0 Multinetwork connectivity Test fail

发表于 2019-07-26 最后回复 2020-08-19

android手机开发者选项->选择USB配置->音频源,这个如何测试

发表于 2017-12-11 最后回复 2017-12-22

android手机开发者选项->选择USB配置->音频源,这个怎么用?

发表于 2017-12-11 最后回复 2017-12-13

新手求助

发表于 2017-02-08 最后回复 2017-02-08

求助!java.lang.OutOfMemoryError

发表于 2014-03-13 最后回复 2014-05-26

vold.fstab请教!!!

发表于 2013-03-13 最后回复 2014-03-13

端午马上就到了,盼望已久的公司过节福利终于发下来了~

发表于 2013-06-08 最后回复 2013-06-14

listview界面更新请教

发表于 2013-01-14 最后回复 2013-03-13

perl正则求助

发表于 2012-12-04 最后回复 2012-12-26

发现CSDN这个版块一个大问题!!!~请进

发表于 2012-11-28 最后回复 2012-11-29

哪里有一些小的perl程序供学习的?

发表于 2012-11-09 最后回复 2012-11-13

过滤log信息,BufferedWriter写入文件无效。help~

发表于 2012-10-31 最后回复 2012-11-09

Help!菜鸟求救,MTK android方案有没有做过来电铃声SIM1,SIM2分开的。

发表于 2012-09-07 最后回复 2012-10-11

周末到了。。。下班了。。。刚收拾好。。。结果。。。。

发表于 2012-08-10 最后回复 2012-08-13

为什么,为什么,为什么前台MM又换了??????

发表于 2012-07-06 最后回复 2012-07-18

深圳医保规定缴费需满25年断3月清零引争议

发表于 2012-06-11 最后回复 2012-06-12

000898现在买进如何?

发表于 2011-11-10 最后回复 2011-11-28

空空如也

TA创建的收藏夹 TA关注的收藏夹

TA关注的人 TA的粉丝

提示
确定要删除当前文章?
取消 删除