作者qrtt1 (XD)
看板CSSE
標題Re: [心得] 簡單的 SQL 簡化設計
時間Thu Jun 2 18:40:26 2005
呵，我也有類似的東東。
有時要寫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
1F：→ qrtt1:呵，有點久之前寫的，之後沒再用了沒有再寫好一點 210.59.94.118 06/02