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有所耳闻,把基础性的东西学一学,然后再来好好的瞧瞧这个巨大的库!

面试失败了

昨天2009年的第一次面试失败了,博客刚好可以记录下,看看自己究竟能失败多少次..
尽管还有一点渺茫的希望,但是自己也开始打退堂鼓了。人家要的是shell,到时要是真进去了,丢不起这人啊!(从今天起开始学习shell~)
php完成的小脚本是考官让我带回来写的,他要的是shell,我还以为是php写的也行..哎~
Read more »

基于PHP的简单4人排班系统

前些日子因为工作需要,做了个在线的4个人轮班的排班表系统,功能很简单,就是按人数与天数来生成一份排班表。
分别需要填写”昨日的早班与夜班” “今日的早班与晚班” “日期的开始与结束”
点击这里看预览
Read more »

php5操作mysql数据库

昨天记录了学习mysql数据库,今天接着学习用php来操作mysql数据库.

  1. <?php
  2. error_reporting(0);
  3. $user = "root"; \\设置mysql账号
  4. $pwd  = "yourpassword"; \\账号密码
  5. $host = "localhost";   \\主机
  6. $myDBmysql_connect($host,$user,$pwd) \\主机,用户名,密码
  7.         or die("无法连接数据库!<BR />");
  8.         echo "连接数据库成功!<BR />";
  9. mysql_close($myDB); \\关闭数据库的连接
  10. ?>



好了,保存一下刷新看看,如果没有错误就会显示”连接数据库成功!”
如果失败则出现”无法连接数据库!”
error_reporting(0);
是禁止输出错误。

8 8...«34567»...8