Ȥ½Ã perl Àß ÇϽôºР°è½Å°¡¿ä??

   Á¶È¸ 3974   Ãßõ 0    

 #!/usr/bin/perl

while (<>) {
       chomp;

       # CHANGE ME: To the actual fields you use in your CSV file
       my ($domain) = split(/\,/, $_, 1);

       print qq{md $domain URL http://mail.$domain\n};
       print qq{\n};
}


이런 쉘스크립트를 작성했습니다. 원래 의도는 example.com이 입력 되어 있는 CSV를 함께 실행했을 때 화면에

md example.com URL example.com

가 떠야 하는데 실제로 실행하면

URL example.com

이렇게 뜹니다. 제가 작성한 스크립트에 어떤 문제가 있을까요?

ªÀº±Û Àϼö·Ï ½ÅÁßÇÏ°Ô.
¹®ÀÚ¿­ $domain À» split Çؼ­ ¹è¿­·Î ¸¸µé¾î¼­ ±×·±°ÍÀÌ ¾Æ´Ñ°¡¿ä?
¹è¿­ÀÇ Ã¹¹ø°¸¸ Âï°í ¸¶´Â µí.
$domain[0] ÇÏ¸é µÉ µíÇÕ´Ï´Ù.
     
µÎ º¯¼ö ¸ðµÎ $domain[0]À¸·Î ÇÏ¸é µÑ ´Ù ºó È­¸é¸¸ Ãâ·ÂÀÌ µÇ°í,
¼±Çຯ¼ö¸¸ $domain[0] À¸·Î ÇÏ°í, µÚ¿¡ ÀÖ´Â º¯¼ö´Â $domain À¸·Î Çϸé
md  URL example.com
ÀÌ·¸°Ô ¾Õ¿¡´Â ºóÄ­À¸·Î ³ª¿À°í µÚÂʸ¸ º¯¼ö°¡ ÁöÁ¤µÇ¾î ³ª¿É´Ï´Ù.
¤Ð¤Ð
          
0¹øÀÌ ³»¿ë ¾øÀÌ À߸°°ÍÀÌ¸é ´Ù¸¥ $domain[1] ¿¡ ÀÖÁö ¾ÊÀ»±î¿ä?
               
ÀÏ´Ü ¹è¿­·Î ãÀ¸¸é 0~5±îÁö ³Ö¾î ºÃ´Âµ¥ ÀüºÎ ºñ¾î ÀÖ´õ¶ó±¸¿ä...ÀÌÀ¯¸¦ ¸ð¸£°Ú½À´Ï´Ù ¤Ð¤Ð
$domain Àº ¹è¿­ÀÌ ¾Æ´Ï¶ó ½ºÆ®¸µ À̱º¿ä. ÆÞ¿¡¼­´Â ¸íĪÀÌ ¸®½ºÆ® ±º¿ä. À§¿¡ Á¦°¡ ¾´ ¸»Àº ´Ù Ʋ¸° ¸»ÀÌ³×¿ä ¤¾¤¾
ã¾Æº¸´Ï ¿ø·¡ $_ À» ÂÉ°³¼­ $domain ¿¡ ³ÖÀ¸¼Ì±º¿ä.
cvs ÇÑÁÙ¿¡ µµ¸ÞÀÎÀÌ ¿©·¯°³¸é @domain = split/,/, $_, °¹¼ö;
ÇÑ°³¸é my($domain) = split(/,/, $_);
¸¸ ÇÏ¸é µÇÁö ¾ÊÀ»±î¿ä? $_ µÚ¿¡ , ¾îÂ÷ÇÇ Ã¹¹ø° ÇÑ°³°¡ urlÀ̸é 1Àº »©°í,
±×·¡µµ Ãâ·ÂÀÌ ¾ÈµÇ¸é °ªÀ» º¹»çÇؼ­ ½áº¸½Ã¸é ¾î¶³±î¿ä?

20³â Àü¿¡ ÆÞ°ú ¸¶ÀÌ¿¡½ºÅ¥¿¤, ¾ÆÆÄÄ¡·Î µµ¼­°ü °ü¸®¸¦ À¥º£À̽º·Î Â¥Áá´Âµ¥, ´çÃé ±â¾ïÀÌ ¾È³ª´Â °ÍÀÌ, ½Ã°£Àº ¾î¿ ¼ö ¾ø³×¿ä.


QnA
Á¦¸ñPage 2376/5696
2014-05   5030497   Á¤ÀºÁØ1
2015-12   1567014   ¹é¸Þ°¡
2016-05   5149   ¸¼Àº¿©¸§
2016-05   7704   ¹Ù´Ù³²ÀÚ
2016-05   5842   ¼ÛÁøÇö
2016-05   5677   ¼ÛÁÖȯ
2016-05   3815   ÀÓÁ¾¿­
2016-05   6761   ±è°Ç¿ì
2016-05   8941   ±è°Ç¿ì
2016-05   5121   ±èµµÇü
2016-05   5518   KShiHyun
2016-05   5409   ¸Å´Ï¾Æ1
2016-05   10374   ¹ÚÀº¼±
2016-05   4722   Á¦ÁÖ±èÀç¹Î
2016-05   6424   ¸Å´Ï¾Æ1
2016-05   7858   ȸ¿øK
2016-05   3975   ¹Ì³ª¸®³ª¹°
2016-05   3506   ÇÇÆĵµ
2016-05   5211   ³ªÆÄÀÌ°­½ÂÈÆ
2016-05   5426   ÀÌ¿øÀçK
2016-05   5009   ¾çâ±Ç
2016-05   7954   ½É¹ÙÆ®