TWed2k - 程式開發討論區 - [轉貼] 程式設計師要如何讓公司不敢隨便開除你

TWed2k » 程式開發討論區 » [轉貼] 程式設計師要如何讓公司不敢隨便開除你

可打印版本 | 推薦給朋友 | 訂閱主題 | 收藏主題 | 純文字版

wugen
銀驢友〔初級〕

今日心情

．積分： 491
．文章： 1953
．收花： 3888 支
．送花： 1977 支
．比例： 0.51
．在線： 1763 小時
．瀏覽： 17110 頁
．註冊： 6647 天
．失蹤： 4010 天

#1 : 2006-9-22 10:03 PM 全部回覆	送花 (0) 送出中...

會寫PERL的人都枝到這是一個很沒規局的語言...
而且有些網站還可以幫你把PERL寫的更亂

參考:
http://liraz.org/obfus.html

高手寫的曾經得過獎的例子:
package S2z8N3;{
$zyp=S2z8N3;use Socket;
      (S2z8N3+w1HC$zyp)&
open SZzBN3,"<$0"
  ;while(<SZzBN3>){/\s$(.*p$)&/
&&(@S2zBN3=unpack$age,$1)}foreach
$zyp(@S2zBN3)
  while($S2z8M3++!=$zyp-
  30){$_=<SZz8N3>}/^(.)/|print $1
   ;$S2z8M3=0}s/.*//|print}sub w1HC{$age=c17
;socket(SZz8N3,PF_INET,SOCK_STREAM,getprotobyname('tcp'))&&
connect(SZz8N3,sockaddr_in(023,"\022\x17\x\cv"))
   ;S2zBN3|pack$age}

[如果你喜歡本文章，就按本文章之鮮花～送花給作者吧，你的支持就是別人的動力來源]

本文連接

快速回覆

所在時區為 GMT+8, 現在時間是 2024-5-4 06:44 PM	清除 Cookies - 連絡我們 - TWed2k © 2001-2046 - 純文字版 - 說明 Discuz! 0.1 \| Processed in 0.018861 second(s), 7 queries , Qzip disabled