Çб³¿¡¼ cgi°úÁ¦¹°ÀÌ ³ª¿Ô´Âµ¥¿©...Àü°øÀÌ ÀÌ·±ÂÊÀÌ ¾Æ´Ï¶ó Çϳªµµ ¸ð¸£°Ú¾î¼¿©...Á˼ÛÇÏÁö¸¸ µµ¿ò Á» ¹ÞÀ»¼ö ÀÖÀ»±î¿©??
Àú¿¡°Ô´Â ¾î·Á¿î°ÅÁö¸¸ ÀÌÂÊ Àü°øÇϽô ºÐµéÀº ±âÃÊÀûÀÎ °ÍµéÀÎ °Í °°Àºµ¥....
data.txtÆÄÀÏ ³»¿ë
Name,Korean,English,Math,Physics
Hong Gildong,92,78,41,74
Kim Chulsoo,47,52,84,58
Park Younghee,67,27,85,74
Lee Youngsoo,84,98,87,47
data.cgi ÆÄÀÏ ³»¿ë
open (IN,"data.txt") || die "cannot read data.txt file n" ;
print "<table width=80% align=center border=1><center>n" ;
$linecnt = 0 ;
while($in = <IN>) {
$linecnt++ ;
$total_score = 0 ;
$average = 0 ;
print "<tr>n" ;
@arr = split(/,/,$in) ;
for($i = 0 ; $i <= $#arr ; $i++) {
print "<td><center>n" ;
print $arr[$i] ;
$total_score = $total_score + $arr[$i] ;
print "</td>n" ;
}
$average = $total_score / 4 ;
if($linecnt == i) {
print "<td>n" ;
print "Totaln" ;
print "</td>n" ;
print "<td>n" ;
print "Averagen" ;
print "</td>n" ;
}
else {
print "<td><center>n" ;
print $total_score ;
print "</td>n" ;
print "<td><center>n" ;
print $average ;
print "</td>n" ;
}
print "</tr>n" ;
}
print "</table>n" ;
print "<hr>n" ;
print $linecnt - 1, " student took exam today n" ;
close IN ;
¿©±â¼ ÃÑÁ¡°ú Æò±ÕÀÇ ÃÖ´ë°ªÀ» °¡Áø »ç¶÷ÀÇ À̸§À» Ãâ·ÂÇÏ·Á ÇÕ´Ï´Ù....
¾î¶»°Ô ÇؾßÇÏ´ÂÁö Á» ¾Ë·ÁÁÖ¼¼¿©...
¾ÆÂü ±×¸®°í À§¿¡ cgiÀÇ ³»¿ëÀº Åڳݿ¡¼ ÀÛ¼ºÇÑ °ÍÀÔ´Ï´Ù...
|
|
|