目前分類:技術小秘訣 (43)

瀏覽方式: 標題列表 簡短摘要

技術小秘訣: 如何從 Apache 統計每天每個小時的網站瀏覽次數?

 

為了從Apache的access_log來統計每天每個小時的網站瀏覽次數,以下簡單的PERL 程式可以幫助各位取得大概的數字。

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

如何利用 Perl 處理 Fortran 輸入檔及執行主程式?

#!/usr/bin/perl

use File::Copy;

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
請直接以絕對路徑的方式來執行即可,先不要用指令cd

System(“ java的所在絕對路徑 C:/WebServ/wwwroot/cgi-bin/hello.java”);

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

#!/usr/bin/perl

open(FILE, "檔案名稱" ) or die "Can't open file\n";

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

#!/usr/bin/perl

use File::Copy;

for( 1 .. 9 )

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

有兩個陣列,每個都有兩欄(所以是 A1,B1 和 A2,B2),A 是座標,對映到一個 B 是 value,
請計算 B1 和 B2 之間的比例,如果他們相對映的A相同或相近。

#!/usr/bin/perl -w

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

有一筆數據是每半個小時一個記錄,但有時候觀測資料有遺缺,則會沒有資料,該如何用perl檢查數據的時間序列,若遇到遺缺的時間點則列出該時間點。

部份數據格式如下:
2007年第19日時間從600 - 1100資料有遺缺

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

#!/usr/bin/perl

use File::Copy;

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
製作人:XXXXXXX 王小名
請輸入資料數:3
第一筆資料:5

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

MODEL 1
ATOM 26 OE2 GLU A 2 -2.046 3.921 2.794 1.00 0.00 O
ATOM 27 H GLU A 2 -5.157 -0.031 1.985 1.00 0.00 H

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
#!/usr/bin/perl
$route_rule1_ref = analyze_route ("router.txt");
$route_rule2_ref = analyze_route ("router1.txt");

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
各位一定不曉的Linux的一般使用者也有重新開機的權限?

如果各位以一般使用者身份用ssh或telnet豋入Linux主機,reboot指令是可以重新開啟機器的。

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

運用對於Linux防火牆中的連線追蹤系統的了解
利用Perl程式語言撰寫一支查詢連線狀況的程式

#!/usr/bin/perl

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
#!/usr/bin/perl

my $password = $ARGV[0];

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
#!/usr/bin/perl

@list = (0..9, a..z, A..Z,'!','@','#','$','%','^','&','*','(',')');

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

如果我們想讓init接收固定的鍵盤組合,而去執行任何指令的話,以下為幾個步驟來瞭解如何找出系統上掌管鍵盤的檔案及指令:

1. 找出系統上對於鍵盤定義的相關套件,以CentOS5為例,其套件應該為:kbd-1.12-19.el5。
2. 瞭解/etc/inittab中kbrequest的動作行為。

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
#!/usr/bin/Perl

@list = (0..9, a..z, A..Z,'!','@','#','$','%','^','&','*','(',')');

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 
常常有人會在家裡利用Linux的主機擔任IP分享器的工作,我們可以使用簡單的iptables功能達到目標。

環境:Linux主機有兩張網路卡eth0及eth1,eth0接到外部網路,eth1交到內部網路。內部網路為192.168.1.0/24。

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

很多MIS人員常常為了設定公司員工的密碼,而想不出一個簡單的方法,現在可以使用bash寫出一個密碼產生器。

#!/bin/bash

declare -i count=0

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

 

你們知道第一個破解 DVD 的程式就是 Perl 嗎? Perl 只需了短短七行程式碼就解開 DVD 的鎖碼

Perl 的出現,可以讓管理者用非常輕鬆的方式完成工作。同樣一件事若用 C 語言 來撰寫,可能 要幾百行甚至到千行程式碼,但用 Perl 來寫可能只要幾十行就結束了。

特別提供Perl DVD 破解碼如下:

台灣 富捷IT培訓 發表在 痞客邦 留言(0) 人氣()

«12 3