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

   Á¶È¸ 3914   Ãßõ 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 2362/5683
2014-05   4955259   Á¤ÀºÁØ1
2015-12   1491778   ¹é¸Þ°¡
2016-05   7595   ¹Ù´Ù³²ÀÚ
2016-05   5782   ¼ÛÁøÇö
2016-05   5578   ¼ÛÁÖȯ
2016-05   3755   ÀÓÁ¾¿­
2016-05   6714   ±è°Ç¿ì
2016-05   8894   ±è°Ç¿ì
2016-05   5055   ±èµµÇü
2016-05   5422   KShiHyun
2016-05   5336   ¸Å´Ï¾Æ1
2016-05   10334   ¹ÚÀº¼±
2016-05   4650   Á¦ÁÖ±èÀç¹Î
2016-05   6369   ¸Å´Ï¾Æ1
2016-05   7809   ȸ¿øK
2016-05   3915   ¹Ì³ª¸®³ª¹°
2016-05   3447   ÇÇÆĵµ
2016-05   5142   ³ªÆÄÀÌ°­½ÂÈÆ
2016-05   5299   ÀÌ¿øÀçK
2016-05   4938   ¾çâ±Ç
2016-05   7897   ½É¹ÙÆ®
2016-05   4753   ÀåÇöÀç