perl的if else判断


perl的if及else判断,纯笔记.

  1. #!/usr/bin/perl
  2. $a=1;
  3. $b=2;
  4. if($b>$a){
  5.    print '$b gt $a'."\n"
  6. }else{
  7.    print '$b is not gt $a'."\n"
  8. }

任何标量都可以是if控制结构里的判断条件!

  1. #!/usr/bin/perl
  2. $a=1;
  3. $b=2;
  4. $RE=$b gt $a;
  5. if($RE){
  6.    print "ture\n"
  7. }else{
  8.    print "failed\n"
  9. }

如果$b大于$a,$RE为真值,输出true. 不else也可以继续if

  1. #!/usr/bin/perl
  2. $a=2;
  3. $b=2;
  4. $RE=$b gt $a;
  5. if($RE){
  6.    print "ture\n"
  7. }
  8. #}else{
  9. #   print "failed\n"
  10. #}
  11. if(!$RE){
  12.    print "failed\n"
  13. }

学习perl


脑袋里根深蒂固的perl代码难读,且固执的认为它能做的shell都能做,所以一直将perl拒之门外,直到近日才发现自己大错特错!
所以很识相的从头学习起! (perl语言入门)
perl6里的新特性 “say” 在5.01里面已经有了!

  1. #!/usr/bin/perl
  2. use 5.010;
  3. say "hello world"

对cpan有所耳闻,把基础性的东西学一学,然后再来好好的瞧瞧这个巨大的库!

2010年 元旦快乐!


迎来了新的一年,展望过去、、、放眼将来、、、
依稀记得1999年躺在床上、看台湾华视的迎接2000年新年钟声的节目,现在再想,已是2010年!
人生短短几十年、祝福在新的一年有更多的收获!
也祝福各位新年新气象、彩票中奖、加官进爵!

the dtc service could not be installed


安装IIS,然后突然想起默认的administrator没有改名,并且将密码一起改掉.
接着安装.net 2.0,提示错误:the dtc service could not be installed. error xxxx 什么什么的.
貌似IWAM没有同步更新造成的?
不对的话请指教! 反正更改密码后最好是重启一次…

恢复Windows2003系统盘权限_重置C盘权限


说来丢人,错误的重置了windows2003 C盘的权限,导致重启后无法远程桌面,所有相关服务也无法开启,以下为修复步骤:

  1. 1) Start (开始) -> Run (运行) -> mmc.exe
  2. 2) file (文件) -> add/remove snap-in... (添加/删除管理单元)
  3. 3) add(添加) -> Security Configuration and Analysis(安全配置和分析) -> add & close (添加并关闭) -> ok(确定)
  4. 4) right-click(右键) -> Open Database(打开数据库)
  5. C:\windows\security\database\Aclrestore.sdb (open/打开)
  6. 5) 还需要添加inf文件,在: C:\windows\inf\defltsv.inf
  7. 6) right-click(右键) -> Configure Computer Now(立即配置计算机) -> reboot(重启)
  8. kvm级别进行的操作,远程操作服务器,像此类操作一定要小心!