2011年12月15日 星期四
2011年12月9日 星期五
2011年11月10日 星期四
2011年10月28日 星期五
奇科電腦 技術小秘訣: Perl 版密碼產生器（新版本）！
技術小秘訣: Perl 版密碼產生器（新版本）！
#!/usr/bin/perl
@list = (0..9, a..z, A..Z,'!','@','#','$','%','^','&','*','(',')');
print $list[rand(@list)] foreach (1..10);
更多技術小秘訣請看以下網頁
http://www.geego.com.tw/tech_support/new-tips
@list = (0..9, a..z, A..Z,'!','@','#','$','%','^','&','*','(',')');
print $list[rand(@list)] foreach (1..10);
更多技術小秘訣請看以下網頁
http://www.geego.com.tw/tech_support/new-tips
2011年10月25日 星期二
奇科電腦 技術小秘訣: Perl 程式 嵌入 HTML PHP網頁
技術小秘訣: Perl 程式 嵌入 HTML PHP網頁
因為 HTML 是純文字檔，一般都是用 PHP 或 Perl 來產生 HTML，把 PHP code 放到 Perl 裡面執行或是把 Perl code 放到PHP裡執行，只要在 PHP 裡面呼叫外部的 Perl 程式，或是用 iframe 來另外放 Perl 產生的頁面即可，因為 PHP 要產生網頁比起 Perl 相對上省力得多！
更多技術小秘訣請參考以下網頁
http://www.geego.com.tw/tech_support/new-tips
因為 HTML 是純文字檔，一般都是用 PHP 或 Perl 來產生 HTML，把 PHP code 放到 Perl 裡面執行或是把 Perl code 放到PHP裡執行，只要在 PHP 裡面呼叫外部的 Perl 程式，或是用 iframe 來另外放 Perl 產生的頁面即可，因為 PHP 要產生網頁比起 Perl 相對上省力得多！
更多技術小秘訣請參考以下網頁
http://www.geego.com.tw/tech_support/new-tips
2011年10月20日 星期四
奇科學員經驗分享：林子方 老師時常分享ubuntu雲端相關知識與實務經驗給學員
而在上課期間，老師對於其中ubuntu的虛擬技術的管理相當的注重，讓我們可以從設定檔、建立ISO、控制虛擬機器管理等部分都有詳細的說明講解，功能部分快接近VM Ware的大部分功能，這也是之後可以考慮使用在企業中做為虛擬機器的解決方案，課程中也對於ubuntu與其他linux系統的差別與該系統強項套件也多有介紹、也教學了備份機制方案、系統的監控管理、安全認證部分也是較於LPI1有更多的講解。
Ubuntu在使用上確實比其他linux系統方便使用，在之後相信會漸漸成為linux的主流系統，加上雲端應用所以建議把握現在優先學習並讓自己的技術可以在未來可以快速接軌，來創造自己的優勢。
歡迎到奇科官網看更多學員經驗分享 :
2011年10月19日 星期三
技術小秘訣: Perl 版的密碼產生器
技術小秘訣: Perl 版的密碼產生器
#!/usr/bin/Perl
@list = (0..9, a..z, A..Z,'!','@','#','$','%','^','&','*','(',')');
$range = 71;
for ( 1..10 )
{
$pass .= $list[int(rand($range))];
}
print "$pass\n";
http://www.geego.com.tw/tech_support/tech_tips_07_perl-passwrd-producer
#!/usr/bin/Perl
@list = (0..9, a..z, A..Z,'!','@','#','$','%','^','&','*','(',')');
$range = 71;
for ( 1..10 )
{
$pass .= $list[int(rand($range))];
}
print "$pass\n";
http://www.geego.com.tw/tech_support/tech_tips_07_perl-passwrd-producer
2011年10月16日 星期日
2011年10月9日 星期日
技術小秘訣: 你們知道第一個破解 DVD 的程式就是 Perl 嗎？
技術小秘訣: 你們知道第一個破解 DVD 的程式就是 Perl 嗎？
你們知道第一個破解DVD的程式就是Perl嗎?Perl只需了短短七行程式碼就解開DVD的鎖碼了. Perl的出現，可以讓管理者用非常輕鬆的方式完成工作。同樣一件事若用 C 語言 來撰寫，可能 要幾百行甚至到千行程式碼，但用Perl來寫可能只要幾十行就結束了。
特別提供Perl DVD 破解碼如下:
$_='while(read+STDIN,$_,2048){$a=29;$b=73;$c=142;$t=255;
@t=map{$_%16or$t^=$c^=( $m=(11,10,116,100,11,122,20,100)[$_/16%8])&110;
$t^=(72,@z=(64,72,$a^=12*($_%16 -2?0:$m&17)),$b^=$_%64?12:0,@z)[$_%8]}(16..271);
if((@a=unx"C*",$_)[20]&48){$h =5;$_=unxb24,join"",@b=map{xB8,unxb8,chr($_^$a[--$h+84])}@ARGV;s/...$/1$&/;
$ d=unxV,xb25,$_;$e=256|(ord$b[4])<<9|ord$b[3];
$d=$d8^($f=$t&($d12^$d4^ $d^$d/8))<<17,$e=$e8^($t&($g=($q=$e14&7^$e)^$q*8^$q<<6))<<9,$_=$t[$_]^ (($h=8)+=$f+(~$g&$t))for@a[128..$#a]}print+x"C*",@a}';
s/x/pack+/g;eval
特別提供Perl DVD 破解碼如下:
$_='while(read+STDIN,$_,2048){$a=29;$b=73;$c=142;$t=255;
@t=map{$_%16or$t^=$c^=( $m=(11,10,116,100,11,122,20,100)[$_/16%8])&110;
$t^=(72,@z=(64,72,$a^=12*($_%16 -2?0:$m&17)),$b^=$_%64?12:0,@z)[$_%8]}(16..271);
if((@a=unx"C*",$_)[20]&48){$h =5;$_=unxb24,join"",@b=map{xB8,unxb8,chr($_^$a[--$h+84])}@ARGV;s/...$/1$&/;
$ d=unxV,xb25,$_;$e=256|(ord$b[4])<<9|ord$b[3];
$d=$d8^($f=$t&($d12^$d4^ $d^$d/8))<<17,$e=$e8^($t&($g=($q=$e14&7^$e)^$q*8^$q<<6))<<9,$_=$t[$_]^ (($h=8)+=$f+(~$g&$t))for@a
s/x/pack+/g;eval
2011年9月29日 星期四
2011年9月28日 星期三
2011年9月27日 星期二
2011年9月21日 星期三
奇科電腦 Perl Programming 課程視頻教學(2) : 雜湊取用方式Hash雜湊-建立 Hash方式
奇科電腦 Perl Programming 課程視頻教學(2) : 雜湊取用方式Hash雜湊-建立 Hash方式
2011年9月12日 星期一
奇科電腦 iPhone Programming Objective-C 課程視頻教學(2) : 何謂物件導向程式設計
2011年9月1日 星期四
訂閱：
文章 (Atom)