ÀÏ´Ü ÆÄÀÏÀ» ¿­¾î¼­ ÀнÀ´Ï´Ù.

$file = `test.dat`;
$i = 1;

open(FILE,>$file);
while(<FILE>) {
chomp($_); #-- °³Ç๮ÀÚÀÇ »èÁ¦
$TEMP_TEXT .= "$i|$_
";
$i++;
}
print FILE $TEMP_TEXT;
close FILE;

ÀÌ·¸°Ô ÇÏ¸é ¿øÇÏ´Â °á°ú°¡ ³ª¿Ã °Í °°³×¿ä..