Perl ÇÔ¼ö : opendir
ÃÑ ÆäÀÌÁö ¼ö : 3224

Àüü ÇÔ¼ö/¿ë¾î»çÀü
Facebook Joinc ±×·ì   Joinc QA »çÀÌÆ®
ÇöÀçÀ§Ä¡ : ¸Þ´º¾ó>20>opendir



joinc´Â Firefox¿Í chrome¿¡¼­ Å×½ºÆ® Çß½À´Ï´Ù. IE¿¡¼­´Â Å×À̺íÀÌ ±úÁö°Å³ª À̹ÌÁö°¡ º¸ÀÌÁö ¾ÊÀ» ¼ö ÀÖ½À´Ï´Ù. ƯÈ÷ ±¸±Û DocsÀ̹ÌÁöÀÇ °æ¿ì ¿¢¹Úó¸®µÉ ¼ö ÀÖ½À´Ï´Ù.

»ç¿ë¹ý

opendir DIRHANDLER, EXPR 
 

¼³¸í

À̸§ÀÌ EXPRÀÎ µð·ºÅ丮¸¦ ¿­°í, µð·ºÅ丮 Çڵ鷯ÀÎ DRIHANDLER¿¡ ¿­¸°ÀÚ¿øÀ» ¿¬°á½ÃŲ´Ù. ÀÌÁ¦ readdirµîÀÇ ÇÔ¼ö¸¦ ÀÌ¿ëÇØ¼­, µð·ºÅ丮¿¡ Æ÷ÇÔµÈ ÆÄÀÏÀ̸§À» ÀоîµéÀÌ´Â µîÀÇ ÀÛ¾÷À» ÇÒ ¼ö ÀÖ´Ù.

¸®Åϰª

  • ½ÇÆÐÇϸé 0
  • ¼º°øÇϸé 0ÀÌ¿ÜÀÇ °ª.

¿¹Á¦

ÀÎÀÚ·Î ÁÖ¾îÁø µð·ºÅ丮¸¦ ¿­°í, µð·ºÅ丮¿¡ ÀÖ´Â ÆÄÀÏÀÇ ¸ñ·ÏÀ» Ãâ·ÂÇÑ´Ù.
#!/usr/bin/perl -w 
 
$dirname = $ARGV[0]; 
opendir(DIR, $dirname) || die "Error in opening dir $dirname"; 
 
while($filename = readdir(DIR)) 
{ 
  print($filename,"\n"); 
} 
close(DIR); 
 
EmailÀ» ±âÀÔÇϸé, ´ñ±ÛÀÌ ¸ÞÀÏ·Î Àü´ÞµË´Ï´Ù.