Re: [心得] 簡單的 SQL 簡化設計

[qrtt1 (XD)]

呵，我也有類似的東東。

有時要寫php或jsp之類的東東，

大部份時都是在填表單變數名稱，

容易填錯又很無聊 :)

#!/usr/bin/perl -w

## author: qrtt1
## date: 2005/02/27
## usage: app_name < form_page

undef $METHOD;

while(<STDIN>)
  {
    if(/method/)
      {
        if(/post/)
          {
            $METHOD='$_POST[';
            next;
          }
        if(/get/)
          {
            $METHOD='$_GET[';
            next;
          }
      }

    if(/(input|select)[^<>]*name/)
      {
        if(/\"([a-zA-Z][a-zA-Z0-9]*)\"/){
            print '$'.$1.' = ';
            print $METHOD;
            print "'";
            print $1;
            print "']";
            print "\n";
          }
      }
  }

--
※ 發信站: 批踢踢實業坊(ptt.cc) 
◆ From: 210.59.94.118
→ qrtt1:呵，有點久之前寫的，之後沒再用了沒有再寫好一點