f_body´Â text typeÀÔ´Ï´Ù.
mssql6.5ÀÌ°í¿ä.
##!/usr/local/bin/perl
#do config;
#do parser;
#$sql = sprintf "insert into test(name,memo) values(?,?)";
#$sth = $dbh->prepare("$sql");
#$sth->execute($form{
name
},$form{
memo
});
=============================================
ÆÞÄÚ¸®¾Æ¿¡¼­ °¡Á®¿Â°Çµ¥¿ä...
±×´ë·Î ÇغÁµµ ¾ÈµÅ¿ä...
À§ÀÇ 1,2,3ÁÙÀº ´Ù¸£±¸¿ä.
#$form{
....
}
¿©±â¼­ ½ºÄ«¶ó󸮽à ¹º°¡ Àú¿Í ´Ù¸¥°Í °°¾Æ¿ä...
Á¦¸Ó¸®·Î´Â µµÀúÈ÷...
255ÀÌ»ó insert°¡ ¾È¿ä... ±Û¾²±â ºÎºÐ¿¡¼­¿ä..
¾Æ ÀÌ°Ô ¸îÀÏ°.... TT
Àú´Â ¹Ø¿¡ ó·³ ó¸®¸¦ ÇØÁÖ¾ú¾î¿ä...
#$input{
body
} =~ s/^/
/g;
#$input{
body
} =~ s/$/
/g;
#insert½Ã Ȧµû¿ÈÇ¥¸¦ ³ÖÁÒ...
#$input{
body
} =~ s/ /
/g;
#$input{
body
} =~ s/

/
/g;
#$input{
body
} =~ s/ / /g;
#$input{
body
} =~ s/
/
/g;
=========================================
#insert into freeboard1(f_body) values(
....
)

.....
ÀÌ»çÀÌ¿¡ ¸¶±¸¾²°í¿ä.
perl·Î ½ÇÇàÇϸé db¿¡ insert°¡ Àߵǿä...
insert into freeboard1(f_body) values(?)
$sth->execute($body);
±×·¡¼­ Àú´Â $body¾ç »çÀÌ¿¡ Ȧµû¿ÈÇ¥¸¦ ³Ö°í À¥»ó¿¡¼­ ±Û¾²±â ¹öÆ°
À» ´©¸£°í ... ÀÌÁ¦´Â µÈ´Ù...
ÇÏÁö¸¸... TT ¾Èµé¾î°¡¿ä... µµ¿ÍÁÖ¼¼¿ä... µµÀúÈ÷ ....
255ÀÌÇÏ·Î ³»¿ëÀ» Àû¾î¼­¾²¸é db¿¡´Â

Ȧµû¿ÈÇ¥¿Í ÇÔ²²ÀúÀåÀÌ µÇÀÖ¾î¿ä. ºÎµð Á¦¹ß ´äº¯ ÇØÁÖ¼¼¿ä.. TT
¾î´Àµ¡ ÀÌƲ¹ãÀ» ¼¼°í Àֳ׿ä.. ¿ä³ð Çϳª¶§¹®¿¡...
¼ö°íÇϼ¼¿ä...