- 博客(48)
- 收藏
- 关注
RSS订阅原创 ORACLE 数据库
删除重复记录 delete from acc a1 where rowid != (select max(rowid) from acc a2 where a1.name = a2.name and a1.age = a2.age)分页select a2.*...
2013-08-13 10:50:10
142
原创 Tomcat 配置 JNDI
JNDI 配置第一种：全局配置 在tomcat的conf文件夹下的context.xml配置文件中加入: 第二种：局部配置（不推荐） 在tomcat的server.xml的标签内，添加： 第三种：局部配置 在项目的META-INFO下面新建context.xml。加入：...
2013-05-06 15:51:08
146
原创 JBOSS 配置指南
jboss7体验及配置入门1、jboss 7.0.2.Final 发布arc版本了，抢先体验下。下载地址：http://www.jboss.org/jbossas/downloads，下载Web Profile Only (Java EE6 Certified)版本。2、把jboss-as-web-7.0.2.Final解压缩到D:\j2ee目录下，完整目录是D:\j2ee\jboss...
2013-04-26 10:15:33
126
原创 perl读写文件
#!/usr/bin/perlmy $SRC_FILE="/home/lgg/t.txt";my $DEST_FILE="/home/lgg/dest.txt";if (open (SRCFILE ,"$DEST_FILE"); my @reads = ; my $count=$#reads; my $curr_index= 0; while($cur...
2012-05-23 10:03:54
109
原创 perl 学习
[SYSTEM1]#config the country No.COUNTRY_CODE= 7 #config the MMSCID of the MMSC ServerMMSC_ID= MMS #config the host name of the MMSC ServerHOST_NAME = HUAWEI #config the dir of ...
2012-05-11 11:19:04
93
原创 DB2 数组
CREATE TYPE IDList AS INTEGER ARRAY[1000];CREATE TYPE Projects AS VARCHAR(100) ARRAY[50];CREATE TYPE Resumes AS XML ARRAY[];
2012-05-02 22:41:23
833
原创 soap开发
1. 创建web工程。编写java接口文件。Com.Java.pojoUser.javaPublic class User{ Private String name; Private int age; Public void setName(String name){this.name=name;} Public String getName{r...
2011-12-28 16:22:45
87
原创 log4j配置
log4j.properties配置详解stone 的 log4j配置详解 Log4J的配置文件(Configuration File)就是用来设置记录器的级别、存放器和布局的，它可接key=value格式的设置或xml格式的设置信息。通过配置，可以创建出Log4J的运行环境。 1. 配置文件Log4J配置文件的基本格式如下： #配置根Logger...
2011-12-23 23:51:11
64
原创 JAVA获得硬件使用信息
http://sharejava.iteye.com/blog/1221048采用singar.jar实现，需要将sigar-x86-winnt.dll、sigar-x86-winnt.lib放到系统的ClassPath中，同样支持Linux系统，需要加入libsigar-x86-linux.so到类路径中， singar项目网站：http://support.hype...
2011-12-22 14:42:16
145
原创 perl 计算时间间隔
#计算时间间隔sub gettimemun(){ my ($time,$timelc,$sec,$min,$hour,$mday,$mon,$year); $time = @_[0]; my @time = reverse(split /-|:|\s|\//,$time); foreach(@time){ s/^0//; $timel...
2011-12-16 17:39:01
609
原创 FilenameFilter文件过滤
import java.io.File;import java.io.FilenameFilter;public class ImageFilter implements FilenameFilter{ public boolean isGif(String file) { if (file.toLowerCase()...
2011-12-15 10:42:49
70
原创 perl将十进制转换为64进制的方法
#!/usr/bin/perl# 将十进制转换为64进制的方法$arr="0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ+/";sub ch_num_to_64(){#参数my @list_data=();my $res_data;my $res =$_[0];if (int($res)=...
2011-11-25 14:09:38
109
原创 perl 正则表达式
正则表达式:$scalarName =~ s/a/b; # substitute the character a for b, and return true if this can happern$scalarName =~ m/a; # does the scalar $scalarName have an a in it?$scalarName =~ tr/A-Z/a-z/; #...
2011-11-25 14:04:00
80
原创 javascript add node
var cGetRow=-99999;var i=0;function AddRow() { //添加一行 var newTr = tab1.insertRow(0); //添加两列 var newTd0 = newTr.insertCell(0); var newTd1 = newTr.insertCell(0); //设置列内容和属性...
2011-10-20 00:09:51
219
原创 perl 文本文件入库
#!/usr/bin/perluse DBI;my $driver="DBI:mysql";my $database="test";my $user="root";my $host="localhost";my $passwd="luogen30";my $dbh = DBI->connect("$driver:database=$database;host=$ho
2011-09-27 00:22:41
117
原创 perl与mysql
一、简介PERL应用数据库由两种方法，其一是利用本身所配置的DBM包，这个可以建立数据库并对其进行操作，因此可以把DBM包以及其他类似的包看作是一个数据库的扩展。另一个就是利用DBI包或者类似的包建立与其他关系型数据库的连接，显然，我们通常需要利用后者。数据库接口（DBI）是由TIM BUNCE（[email protected]）所书写，DBI是专门为PERL所书写。你可以在...
2011-09-27 00:20:06
72
原创 perl操作oracle数据库
到：http://search.cpan.org/~timb/DBI-1.613/lib/DBI/DBD/SqlEngine.pm下载DBI-1.6和到：http://search.cpan.org/~pythian/DBD-Oracle-1.21/下载DBD-Oracle-1.21[root@localhost ~]# tar zxvf DBI-1.613.tar.gz[...
2011-09-26 23:31:25
400
原创 perl操作mysql数据库
#!/usr/bin/perl -wuse DBI;my $driver="DBI:mysql";my $database="test";my $user="root";my $host="localhost";my $passwd="luogen30";my $dbh = DBI->connect("$driver:database=$database;host=
2011-09-26 23:06:46
145
原创 perl中获取某个域名的全部ip
#!/usr/bin/perlmy @dns=`nslookup www.baidu.com `;@ip;@iptable;for(2..$#dns){ $row = $dns[$_]; if($row =~ /\d+/) { $row =~ /(\d+\.\d+\.\d+\.\d+)/; push @ip, $1; }}foreach (@...
2011-09-26 22:26:19
201
原创 perl中获取浮动ip
通过strace ifconfig命令可以看到，linux实质是通过ioctl命令完成的网络接口ip获取。那么，我们也用ioctl就是了！如下：#!/usr/bin/perluse strict;use warnings;use Socket;require 'sys/ioctl.ph';sub get_ip_address($) { my $pack...
2011-09-26 22:20:47
64
原创 perl中去掉字符串中空格
Perl codeuse strict;use warnings;my $str=" \n aaa bbb\n ";$str=~s/^\s+|\s+$//g;print($str);^Daaa bbb
2011-09-26 22:02:33
1019
原创 get the max num in bash language
#!/bin/bash #get the max num echo; echo "------test get the max num of two nums----- "; EQUAL=0; E_PARAM_ERR=-9999; max2() { if [ -z "$2" ] then echo $E_PARAM_ERR; return; fi ...
2011-09-06 23:36:49
58
原创 perl操作数组
#!/usr/bin/perl -w #test the string print "hello" ." ". "world!\n"; #字符串连接 print "hello" x 4 . "\n"; print "ha" x (2+3) . "\n"; print "12ggdd" * 3 ."\n"; #启
2011-09-06 23:34:14
87
原创 bash操作数组
#!/bin/bash declare -a colors; echo "Enter your favorite colors (septated from each other by space)."; read -a colors; #get the length of array element_count=${#colors[@]}; index=0; #a...
2011-09-06 23:31:58
50
原创 dblink常用方法
dblink常用方法: 1. 创建dblink -- Create database link create public database link XMDS_KF connect to L2105 using '(DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)...
2011-09-06 23:27:24
84
原创 数据库分页
1. 数据库分页： mysql: select * from A limit startRow,endRow oracle: select b.* from (select a.*,rownum as linenum from (select * from A) a where rownum= startRow H...
2011-09-06 23:25:42
33
原创 java从文件尾部读文件
package read.file.form.emd;import java.io.FileNotFoundException;import java.io.IOException;import java.io.RandomAccessFile;public class ReadFileFromEndUtils { public static void main(...
2011-09-01 00:44:11
320
原创 java 解析zip中的xml
import java.io.IOException;import java.io.InputStream;import java.util.ArrayList;import java.util.Enumeration;import java.util.Iterator;import java.util.List;import java.util.zip.ZipEntry;...
2011-08-31 08:19:28
392
原创 dblink实现存储过程远程调用
步骤 ：1. --创建DBLink create public database link testLink connect to l2108 identified by websms using '(DESCRIPTION = (ADDRESS_LIST = (ADDRESS = (PROTOCOL = TCP)(HOST = 10.137.17.98)(PORT = ...
2011-08-22 15:56:20
1109
原创 oracle 函数
-- 判断V网类型 SELECT LENGTH(P_TYPE) INTO V_LEN FROM DUAL; IF V_LEN != 1 THEN P_RETVAL := 1002; -- V网类型不合法 RETURN; END IF; select NVL(REGEXP_SUBSTR(P_TYPE, '[0|1]'), '-1') into V...
2011-08-16 11:23:05
46
原创 oracle 分页（存储过程实现）
--开始编写分页的过程create or replace procedure fenye(tableName in varchar2, pageSize in number, --每页显示记录数 pageNow in number, ...
2011-08-11 15:12:28
56
原创 oracle plsql 游标
create or replace procedure test_proc is v_corpid corpinfo.corpid%type := '16000000001%'; vv corpinfo%rowtype; --定义游标 cursor one is select * from corpinfo where corpinfo.corpid ...
2011-08-11 14:35:21
42
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人