계속추가할꺼임


Ctrl + Shift + O : 자동 Import!


Ctrl + I : 들여쓰기 자동수정

Ctrl + L : 원하는 소스 라인으로 이동


펄의 해쉬처럼 자바에서도 쓸수있다.

Hashtable


다음은 파일로부터 읽어와 키와 밸류쌍으로 해쉬테이블을 구성하고 출력하는 코드이다.

불러올 파일(WEB.log)의 내용은

#***** PROCESS DATE : 20120207 15:48

#***** FINISH!(WEB) *****

SEND_SUCCESS:4

CHANGE_STATUS:2

CONFIRM!_CHECK:30

DRAFT_SEND_SUCCESS:8

FOLDERSHARE_ADD:1

MBOX_CLEAN:20

LOGIN:21

ADDRBOOK_FAST_GROUP_ADD:1

MAIL_VIEW:33

PADDRBOOK_GROUP_REMOVE:1

SHAREFOLDER_MAIL_COPY:1

MAIL_REMOVE:2

이런식으로 되어있고 로그명은 키, 카운트는 밸류로 구성한다.



        private Hashtable<String,String> get_log_file() {

                Hashtable<String,String> logset = new Hashtable<String,String>();

                try {

                        BufferedReader in = new BufferedReader(new FileReader("/home/webmail/myst_export_log/record/WEB.log"));

                        String s;

                        while ((s = in.readLine()) != null) {

                                if (s.equals("") || s.charAt(0) == '#') { continue; }  //라인이 공백이거나 첫글자가 #이면 패스

                                String temp[] = s.split(":");

                                logset.put(temp[0], temp[1]); // logset에 넣음

                        }

                        in.close();

                } catch (IOException e) {

                        e.printStackTrace();

                }


                //출력하기

              Enumeration en = logset.keys();

              while (en.hasMoreElements()) {

                      String key = en.nextElement().toString();

          System.out.println(key + " :::: "+logset.get(key));

              }

              return logset;

        }


'업무 > Java' 카테고리의 다른 글

[java] Spring 스케줄러, QuartzJobBean  (0) 2012.05.21
[java] euc-kr , utf-8 인코딩 변환  (0) 2012.04.30
[java] 파일 읽기  (0) 2012.02.08
[java] 파일 실행해서 출력시키기  (0) 2012.02.07
[java] 파일 존재여부 판단  (0) 2012.02.07

파일 라인단위로 읽어서 출력합니다.


import! java.io.*;

-------------------------------

try{

    BufferedReader in = new BufferedReader(new FileReader("/home/webmail/test.txt"));

    while ( (String s = in.readLine()) != null ) {

        System.out.println(s);

    }

    in.close();

} catch (IOException e) {

    e.printStackTrace();

}


'업무 > Java' 카테고리의 다른 글

[java] euc-kr , utf-8 인코딩 변환  (0) 2012.04.30
[java] hashtable 사용  (0) 2012.02.08
[java] 파일 실행해서 출력시키기  (0) 2012.02.07
[java] 파일 존재여부 판단  (0) 2012.02.07
[java] war 만들기 / 풀기  (0) 2012.02.06

외부 파일을 실행하여 실행결과를 출력합니다.


import! java.io.*;


public class File_EXE {


    public static void main(String[] args) {

        String s;

        try {

            String cmd = "/home/webmail/test/time_converter.pl -dtu 2012/02/08/00/00/00";


            Runtime rt= Runtime.getRuntime();

            Process oProcess = rt.exec(cmd);


            BufferedReader stdOut = new BufferedReader(new InputStreamReader(oProcess.getInputStream()));

            BufferedReader stdErr = new BufferedReader(new InputStreamReader(oProcess.getErrorStream()));


            while( (s = stdOut.readLine()) != null) System.out.println(s);

            while( (s = stdErr.readLine()) != null) System.out.println(s);

        } catch (Exception e) {

            e.printStackTrace();

            System.exit(-1);

        }

    }

}



'업무 > Java' 카테고리의 다른 글

[java] hashtable 사용  (0) 2012.02.08
[java] 파일 읽기  (0) 2012.02.08
[java] 파일 존재여부 판단  (0) 2012.02.07
[java] war 만들기 / 풀기  (0) 2012.02.06
[javascript] input 태그  (0) 2012.01.30

*파일 존재여부

import! java.io.*;

==============================

File f = new File("파일명.txt");


if (f.isFile() ) {

    //존재할때

} else {

    // 존재안할때

}


*디렉토리 존재여부

import! java.io.*;

==============================

File d = new File("dir명");


if ( d.isDirectory() ) {

    //존재할때

} else {

    // 존재안할때

}



'업무 > Java' 카테고리의 다른 글

[java] 파일 읽기  (0) 2012.02.08
[java] 파일 실행해서 출력시키기  (0) 2012.02.07
[java] war 만들기 / 풀기  (0) 2012.02.06
[javascript] input 태그  (0) 2012.01.30
[eclipse] 매개변수  (0) 2011.12.20


*war 만들기

jar cvf test.war *



*war 풀기

jar xvf test.war



'업무 > Java' 카테고리의 다른 글

[java] 파일 읽기  (0) 2012.02.08
[java] 파일 실행해서 출력시키기  (0) 2012.02.07
[java] 파일 존재여부 판단  (0) 2012.02.07
[javascript] input 태그  (0) 2012.01.30
[eclipse] 매개변수  (0) 2011.12.20

시간을 동기화 합니다.


$ rdate -s time.bora.net

$ rdate -s time.kriss.re.kr





그냥 참고.
쓸때가 생기더라구요.ㅎㅎ
 

sub TEST($)

{

    my ($var_file) = @_;

    print $var_file "Hello world\n";

}


MAIN:

{

    local(*F);

    if ( !open (F, "/usr/local/test.txt" )) {

        print "ERROR : OPEN FILE(/usr/local/test.txt)\n";

        exit(0);

    }

    TEST(F);

    close(F);

}





'업무 > Perl' 카테고리의 다른 글

[perl] Hash 크기 구하기  (0) 2012.02.27
[perl] DBD-mysql 모듈 경로지정해서 설치하기  (0) 2012.02.20
[perl] 어제날짜 구하기  (0) 2012.02.02
[perl] 화면지우기  (0) 2012.01.31
[perl] A~ Z까지 순차적으로 출력하기  (0) 2011.12.15



오늘의 날짜가 1일인데 어제날짜를 구해야하는 프로그램을 짜야할떄..

어제가 30일인지 31일인지.. 또는 2월이 윤달인지 아닌지 참 헷갈리고 수동으로짜야하면 노가다임..ㅠㅠ

그럴때~! 응용하면 되는 프로그램!! ㅎㅎ


use Time::Local;


sub get_yesterday($$$)

{

    my ($y, $m, $d) = @_; #년도, 월, 일을 입력받는다.(날짜지정해서쓸때만 인자받음)

    my ($sec, $min, $hour, $mday, $mon, $year) = (0,0,0,$d,$m-1,$y-1900); #날짜지정해서 쓸때

    #my ($sec, $min, $hour, $mday, $mon, $year) = localtime();  #그냥 현재날짜만 쓸때

    my $yesterday_midday=timelocal(0,0,0,$mday,$mon,$year) - 60*60*24;

    ($sec, $min, $hour, $mday, $mon, $year) = localtime($yesterday_midday);

    my $YesterdaysDate = sprintf("%4d%02d%02d", $year+1900, $mon+1, $mday);

    return $YesterdaysDate; 

}


리턴값 :  20120201 (오늘날짜가 2월2일이라면..)

cd /etc/yum.repos.d/


rpm -i epel-release-5-4.noarch.rpm


yum install git


chown -h 소유자.그룹 심볼릭링크파일명


예 ) # chown -h webmail.webmail MBOX ATTACH LOG 

system("clear");



끝~!

mysql> source 파일명


ㅇㅖ)  mysql> source addr_book.sql


pgsql이  /usr/local/pgsql  에 깔려있다면



# pg_ctl reload -D /usr/local/pgsql/data


input 태그 총정리 

1. <input> : 평범하게 글자나 텍스트칸을 넣을 수있는 공간이 생기죠.
2. <input type=""> : 기존의 input에다가 type를 지정하여 type의 옵션을 넣으면, 
다양한 모양이 됩니다. 단 입력이나 기타 등등의 모양 꼴로 변하죠.

3. <input type="text"> : 이건 <input>과 동일한 것인데, text를 넣을 수 있습니다.
4. <input type="password">: 이건 1번과 2번과 3번과 동일한데, 비밀번호로 지정되어 글자를 넣든 숫자를 넣든 **** <-이렇게 표시됩니다.

4. <input type="checkbox"> : 이건 체크박스로 나타납니다.
5. <input type="checkbox" checked> : 이건 체크박스의 선택된 것으로 나오죠.
6. <input type="checkbox" checked disabled> : 이건 체크되었다가 다시는 선택 못하게 하는거죠

7. <input type="radio"> : 이건 라디오 버튼으로 나타납니다.
8. <input type="radio" checked> : 이건 라디오 버튼의 선택된 것으로 나오죠.
9. <input type="radio" checked disabled> : 이건 선택되었다가 다시는 선택 못하게 하는거죠

10. <input type="hidden"> : 이건 숨김필드입니다. 값을 넘겨받을때 숨김속성으로 몰래 감춰지죠. 
대부분 form태그의 중요한 속성을 사용할 때 하더군요.

11. <input type="image" src="이미지 경로및 주소"> 이건 이미지의 경로를 넣어 일반<img>태그 처럼 할 수 있습니다. 
단 버튼이 이미지의 경로로 바뀌고,form 태그의 submit 태그와 함께 포함되어 있습니다.

12. <input type="reset"> : 이건 초기화 하는 버튼(영어로 submit 또는 초기화라고 나옴)
13. <input type="reset" value="초기화"> :  value값에 초기화라고하면 초기화라고 만들어줌

14. <input type="submit"> : 이건 전송버튼
15. <input type="submit" value="전송함"> : 전송버튼인데다가 버튼이름을 전송함 이라고 할 수있음.
16. <input type="file"> : 파일을 첨부할 때 사용하며, CSS와 곁들어서 사용 가능

'업무 > Java' 카테고리의 다른 글

[java] 파일 읽기  (0) 2012.02.08
[java] 파일 실행해서 출력시키기  (0) 2012.02.07
[java] 파일 존재여부 판단  (0) 2012.02.07
[java] war 만들기 / 풀기  (0) 2012.02.06
[eclipse] 매개변수  (0) 2011.12.20

업무용..

-Xms256m -Xmx512m -XX:MaxPermSize=256m

'업무 > Java' 카테고리의 다른 글

[java] 파일 읽기  (0) 2012.02.08
[java] 파일 실행해서 출력시키기  (0) 2012.02.07
[java] 파일 존재여부 판단  (0) 2012.02.07
[java] war 만들기 / 풀기  (0) 2012.02.06
[javascript] input 태그  (0) 2012.01.30

대문자 A 아스키코드 선언

my $asc = 65;

 

문자로 출력하기

print chr($asc);

 

한개씩 증가시키기

$asc++;


1. 그냥 출력하기

#!/usr/bin/perl

use strict;

use POSIX;


MAIN:

{

    my $unix_time = "1322086860";

    my $date = localtime($unix_time);

    print "$date \n";

}


#출력결과

Thu Nov 24 07:21:00 2011




2. 형식에 맞게 출력하기

#!/usr/bin/perl

use strict;

use POSIX;


MAIN:

{

    my $unix_time = "1322086860";

    my $date = POSIX::strftime("%Y/%m/%d %H:%M", localtime($unix_time));

    print "$date\n";

}


#출력결과

2011/11/24 07:21

 

'업무 > Perl' 카테고리의 다른 글

[perl] 화면지우기  (0) 2012.01.31
[perl] A~ Z까지 순차적으로 출력하기  (0) 2011.12.15
[perl] 버클리DB (dbf) 읽는 함수  (0) 2011.11.25
[perl] GUI 프로그램 - Wx 인스톨 절차  (0) 2011.11.09
[perl] 펄로 MySQL 사용하기  (0) 2011.10.29

sub get_dbf($)

{

    my ($old_home) = @_;


    my (%h, $k, $v);

    my $euckr_to_utf8 = Text::Iconv->new("EUC-KR","UTF-8");


    my $filename = $old_home;

    tie %h, "DB_File", $filename;


    my $h_arr = {};

    while (($k, $v) = each %h ) {

       # EUCKR -> UTF8

       $k = $euckr_to_utf8->convert($k);

       $v = $euckr_to_utf8->convert($v);


       # remove (^@ -> \x00) (^M -> \x08) (^E -> \x05)

       $k =~ s/[\t\r\n\x00\x08\x05]//g;

       $v =~ s/[\t\r\n\x00\x08]//g;


       $v =~ s/\x05/\|\^\|/g;


       #my @arr = split(/\|\^\|/, $v, 14);


       $h_arr->{$k}=$v;

    }

    untie %h;

    return $h_arr;

}




버클리DB를 사용하는 dbf파일의 뷰어입니다.

 

<%

String id=request.getParameter("id");

String passwd = request.getParameter("password");

String name = request.getParameter("name");

Timestamp register = new Timestamp(System.currentTimeMillis());


Connection conn=null;

PreparedStatement pstmt=null;


String str="";

try{

 String jdbcURL = "jdbc:mysql://localhost:3306/test";

 String dbId="root";

 String dbPass="pass";

 

 Class.forName("com.mysql.jdbc.Driver");

 conn=DriverManager.getConnection(jdbcURL,dbId,dbPass);

 

 String sql="INSERT INTO member VALUES(?,?,?,?)";

 pstmt=conn.prepareStatement(sql);

 pstmt.setString(1,id);

 pstmt.setString(2,passwd);

 pstmt.setString(3,name);

 pstmt.setTimestamp(4,register);

 pstmt.executeUpdate();

 str = "member테이블에 새로운 레코드를 추가하였습니다!";

} catch(Exception e){

 e.printStackTrace();

 str="실패했음";

} finally {

 if(pstmt != null) try{pstmt.close();}catch(SQLException sqle){}

 if(conn !=null) try{conn.close();} catch(SQLException sqle){}

}

%>



'업무 > JSP' 카테고리의 다른 글

[jsp] include 액션태그에서 파라미터 전달하기  (0) 2011.11.09
[jsp] 한글 깨지지 않게 하기  (0) 2011.11.09

<jsp:include page="포함되는 페이지" flush="false">

    <jsp:param name="paramName1" value="var1" />

    <jsp:param name="paramName2" value="var2" />

<jsp:include>


'업무 > JSP' 카테고리의 다른 글

[jsp] jdbc- INSERT하기  (0) 2011.11.09
[jsp] 한글 깨지지 않게 하기  (0) 2011.11.09

<% request.setCharacterEncoding("euc-kr"); %>


웹브라우저가 웹서버 쪽으로 요청을 했을 때,

요청정보에 한글이 있을 경우 한글이 깨지는 것을 방지하기 위한 한글 인코딩.

폼으로부터 입력받는 데이터에 한글이 들어가있을경우 반드시 써줘야 한다.

'업무 > JSP' 카테고리의 다른 글

[jsp] jdbc- INSERT하기  (0) 2011.11.09
[jsp] include 액션태그에서 파라미터 전달하기  (0) 2011.11.09

그냥 재미삼아 ^^

 내용은 나중에 추가

환경 : 윈7 64bit 딸기펄

 

c:\>cpan -i Bundle::CPAN

 

c:\>cpan

cpan> install Wx

cpan> install PAR

cpan> install PAR::Packer

cpan> install Wx::Perl::Packager

 

 

exe로 만들기

wxpar --gui -o test.exe Notepad.pl


select DATE_FORMAT(date_header,'%a, %d %b %Y %T +0900') from table_name;


이렇게 하면

Tue, 04 Oct 2011 16:50:00 +0900


요렇게 출력된다.

eml파일의 헤더에 넣기위해...!! 


Date: Tue, 04 Oct 2011 16:50:00 +0900


#!/usr/local/mobigen/CrediMail/perl/bin/perl -w

BEGIN {

#$ENV{{IB_PATH} = "/usr/local/mobigen/mysql/lib/mysql";

#$ENV{LD_LIBRARY_PATH} = "/usr/local/mobigen/mysql/lib/mysql";

    push @main::INC, ".";

    push @main::INC, "/usr/local/mobigen/CrediMail/modules";

};

use strict;

use mobigen;

use DBI;


MAIN:

{

    if (! @ARGV) {

        print "Usage : $0 userid \n";

        exit(0);

    }


    my $db = DBI -> connect("DBI:mysql:database=private_db:host=localhost","id","password",{'RaiseError'=> 1}); #알맞게 수정하세요

    print "DB_CONNECT SUCCESS\n";


    my $sql = "SELECT * FROM TABLE";

    my $sth = $db->prepare($sql);

    $sth->execute();

    print "DB_SELECT MAILBOX\n";


    my $mailbox ={};

    while (my @row_ref = $sth->fetchrow_array){

        $mailbox->{$row_ref[0]} = $row_ref[1]} ;

    }

    $sth->finish;


    $db->disconnect();

}



'업무 > Perl' 카테고리의 다른 글

[perl] 버클리DB (dbf) 읽는 함수  (0) 2011.11.25
[perl] GUI 프로그램 - Wx 인스톨 절차  (0) 2011.11.09
[perl] 한라인으로 배열 출력  (0) 2011.10.26
[perl] 정규식 옵션  (0) 2011.10.21
[perl] 현재 날짜 출력하기  (0) 2011.10.21

foreach my $line (@array) {
    print "$line \n";




print $_. "\n" foreach(@array);


요고는 같습니다

 

즉 배열을 있는그대로 출력하고자할때

한줄로 간단하게 줄여쓸수 있다는거죠

'업무 > Perl' 카테고리의 다른 글

[perl] GUI 프로그램 - Wx 인스톨 절차  (0) 2011.11.09
[perl] 펄로 MySQL 사용하기  (0) 2011.10.29
[perl] 정규식 옵션  (0) 2011.10.21
[perl] 현재 날짜 출력하기  (0) 2011.10.21
[perl] 임시...  (0) 2011.09.21

* 폴더개수 세기

# ls -l |grep ^d| wc -l



* 파일개수 세기

# ls -l |grep ^- | wc -l



 옵션 설명 
 g  가능한 모든 패턴과 일치
 i  대소문자를 무시
 m  스트링을 다중 행으로 취급
 o  한번만 계산
 s  스트링을 단일 행으로 취급
 x  패턴 내의 공백 문자 무시

 

'업무 > Perl' 카테고리의 다른 글

[perl] GUI 프로그램 - Wx 인스톨 절차  (0) 2011.11.09
[perl] 펄로 MySQL 사용하기  (0) 2011.10.29
[perl] 한라인으로 배열 출력  (0) 2011.10.26
[perl] 현재 날짜 출력하기  (0) 2011.10.21
[perl] 임시...  (0) 2011.09.21

#!/usr/bin/perl

use POSIX;

MAIN:

{

    my $c_date = POSIX::strftime("%Y%m%d%H%M%S", localtime(time()));

    print "$c_date \n";

}


'업무 > Perl' 카테고리의 다른 글

[perl] GUI 프로그램 - Wx 인스톨 절차  (0) 2011.11.09
[perl] 펄로 MySQL 사용하기  (0) 2011.10.29
[perl] 한라인으로 배열 출력  (0) 2011.10.26
[perl] 정규식 옵션  (0) 2011.10.21
[perl] 임시...  (0) 2011.09.21

+ Recent posts