¸½ºß 6 º£Æü 1 ¹ç·× 3267
¸¦µæ¥Æ¡¼¥Þ
open(IN,"sample.dat"); while(<IN>){ if(/<IMG height="160" alt="(.*?)"/){ $i++; print "$i $1\n"; } } close(IN);
ÌÚ¼¥¼¥ßÀ¸¸ÂÄê