본문 바로가기

분류 전체보기

IP Random 생성 : IP Random generation #!/usr/bin/perl # made by MaJ3stY # ######################################################################## system("cls"); sub ranip() { $ip = join(".", map int(rand(256)), 1..4); print "IP : $ip \n"; } while() { ranip(); print "Continue IP...(Enter)"; print "\n"; print "End is Ctrl + c \n"; } print "The End"; ######################################################################## 아이피 랜덤 생성 코드.. 더보기
줄 번호 매겨주는 perl 소스 코드 : Perl source code line number attached #!/usr/bin/perl use strict; use warnings; # made by MaJ3stY # ################################################################### my $line = 1; while () { printf("%d: %s", $line, $_); $line++; } ################################################################### 제가 perl 공부할때 잠깐잠깐 생각 났을때 짜본 것들 입니다. perl이 정말 간단하고 쓰기가 편하긴 하네요 ^^; 사용방법은 간단합니다. 같은 경로에 소스코드와 대상파일을 넣고 소스코드를 컴파일 시켜주시면 됩니다. Perl is what .. 더보기
라인 줄 수를 세어주는 perl 소스코드 : Count the number of line to line perl source code #!/usr/bin/perl system("cls"); system("dir"); # made by MaJ3stY # ################################################################### print "Filename Input(ex : 123.txt) : "; chomp($filename = ); if ( -e $filename ) { print "$filename Exist!!!!\n"; }else{ print "$filename No!!!\n"; } open INPUT, "$filename" or die "$filename file open error : $! "; while() { $linecnt++; } close INPUT; print "Lin.. 더보기
SQL Injector 비교 문서 SQL Injector 비교 문서입니다. 각 기능들에 대한 비교등등이 기록되어 있는 pdf 파일 입니다. SQL Injector is a comparison. And a comparison of each feature, and a pdf file is written. 더보기
IP Scanner 같은 네트워크망에 살아있는 아이피와 호스트를 스캔 해주는 도구 입니다. 사용법은 간단합니다. 자신이 스캔하고 싶은 아이피의 범위를 정해주고 시작버튼을 눌러 주시면 됩니다. Live on the same IP network and the host is a tool to scan. How is simple. They want to scan a range of IP, please click the Start button, and will be determined. 더보기