求程序思路~达人来~在线等(急)

┏.璇轉

接了个程序要求,但是刚学Perl不久,还没有从0开始编程,所以刚遇到没有任何思路,主要就是不知道用什么函数~  请高手指教


程序要求大致如下:


WebTermCmd.cgi
  从本页获取登录状态,LoginStatus
--------------------------------------------------------------------------------------
  #状态0
  if(loginstatus == 0 || loginstatus== undef) {(初始化)
   &action0();
  }
----------------------------------------------------------------------------------------
#状态1
  elsifif( Loginstatus==1){ (待登陆)
    从form参数获取登陆信息
    调用后台的WebTerm.pl程序，参数为ip 用户名 密码 登录方式
    eg:/slview/nms/bin/WebTerm.pl 10.0.0.191 slview slview`123 telnet

   if 调用失败,{
   alert "登陆失败，请重新输入"
   &action0();
   }
   elsif调用成功{
   调用ouputresult函数，向result frame输出"登录成功"
   &action1();
   }
  }
--------------------------------------------------------------------------------------------
  #状态2
  elsifif( Loginstatus==2){ (已登陆)
    if($cmd ne ''){
    向后台的WebTerm.pl发送socket消息"cmd: $cmd"
    收到的消息，调用ouputresult函数，输出到WebTermResult的textarea
   }
    &action1();
  }
--------------------------------------------------------------------------------------------
  #状态3
  elsifif( Loginstatus==3){ (待退出)
    向后台的WebTerm.pl发送socket消息"quit"
    resetresult(),清除result frame的textarea内容
    &action0();
  }
--------------------------------------------------------------------------------------------

大概就是这样  里面的action0()   action1()   不用理先  只是给个程序的大概结构  说白了就是用什么函数代表上面的一堆中国字....

麻烦了~~~

[ 本帖最后由 ┏.璇轉 于 2006-9-12 16:31 编辑 ]

rollingpig

http://bbs.chinaunix.net/viewthr ... &extra=page%3D1

Search for CGI……

┏.璇轉

晕~~ 全英文的...........................

┏.璇轉

那个啥,斑竹,谢谢你的指点,但是俺确实看不懂那英文啊,能不能简单帮俺说说这个程序呀~~~   
麻烦你啦斑竹~~~

┏.璇轉

其实就是只有4个状态   乍一看很多很麻烦  但是仔细一看 其实就几个句子而已   

还望大家帮帮忙  明天要交工  现在能靠自己写出来的东西太少  还在熟悉...

麻烦了大家了哈~~

woqpalsk

一言难尽。。。支持你兄弟