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

代码片段 8064

#Perl
perl 删除过期文件

#!/usr/bin/perl `find /bak/ >list.txt`; open LIST,"/root/list.txt"; while (<LIST>…

2015-12-14 761

#Perl
遍历目录下所有的文件

#!perl # #作者:赵灿星 #本perl脚本用于遍历目录下所有文件,使用时请将本脚本拷贝到需要遍历的目录下,双击即可 # # use strict; use Cwd; use…

2015-12-14 932

#Perl
perl读取excel文件内容

#!/usr/bin/perl -w use strict; use feature 'say'; use Spreadsheet::ParseExcel; ####excel操作…

2015-12-14 646

#Perl
冒泡排序

#!/usr/bin/perl use strict; use warnings; use feature qw(say); my @e = qw/ 4 88 5 21 92 37…

2015-12-14 436

#Perl
根据使用频率输出dmenu的结果

#!/usr/bin/perl # sydi_dmenu --- # # Filename: sydi_dmenu # Description: This script make …

2015-12-14 275

#Perl
Perl 使用 OLE ADO 操作数据库

#!c:/perl/bin use Win32::OLE; use Win32::OLE::Const 'Microsoft ActiveX Data Objects'; $tab…

2015-12-14 150

#Perl
Perl 读取 word 文档并打印

#!/usr/bin/perl -w use Win32::OLE; $filename = 'wordFile.doc'; $doc = Win32::OLE->GetOb…

2015-12-14 169

#Perl
Perl 使用 AnyDBM 操作 DBM 文件

#!/bin/perl use AnyDBM_File; dbmopen(%states, "statedb", 0666) || die; TRY: { print "state…

2015-12-14 365

#Perl
Perl 获取Windows当前登录的用户名

#!/usr/bin/perl -w use Win32; $username = Win32::LoginName(); print "User name: $username\…

2015-12-14 910

#Perl
Perl 从 HTML 网页中解析出链接

use LWP::Simple; use HTML::LinkExtor; $html = get("http://www.oschina.net"); $link_extor =…

2015-12-14 602

#CSS
Echarts 图表放到bootstrap的tab-panel中不加载

/* tab panel 不显示Echarts 图表问题 */ /* bootstrap hack: fix content width inside hidden tabs */…

css
2015-12-14 866

#CSS
多重背景CSS图片 一直运动的图片

.animate-area { background-image: url(image/twitter-logo-bird.png), url(image/treehouseFro…

css
2015-12-14 415
1 42 43 44 45 46 672