{"id":791,"date":"2017-10-25T11:15:46","date_gmt":"2017-10-25T20:15:46","guid":{"rendered":"\/blog\/?p=791"},"modified":"2023-09-21T09:37:43","modified_gmt":"2023-09-21T00:37:43","slug":"2%ec%8b%9c%ea%b0%84-%eb%b0%98%eb%a7%8c%ec%97%90-perl-%ec%9d%b5%ed%9e%88%ea%b8%b0","status":"publish","type":"post","link":"https:\/\/hasu0707.duckdns.org\/blog\/?p=791","title":{"rendered":"2\uc2dc\uac04 \ubc18\ub9cc\uc5d0 Perl \uc775\ud788\uae30"},"content":{"rendered":"<h1 style=\"font-family: Gulim;\">2\uc2dc\uac04 \ubc18\ub9cc\uc5d0 Perl \uc775\ud788\uae30<\/h1><h2 style=\"font-family: Gulim;\"><a href=\"https:\/\/qntm.org\/perl\">\uc800\uc790: Sam Hughes<\/a>, \ubc88\uc5ed: \uae40\uc9c4(Kim Jin)<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ud384(Perl)\uc740 \ub3d9\uc801 \ud0c0\uc785\uc758 \uace0\uc218\uc900, (\uc778\ud130\ud504\ub9ac\ud2b8\ub418\ub294) \uc2a4\ud06c\ub9bd\ud2b8 \uc5b8\uc5b4\ub85c PHP\uc640 \ud30c\uc774\uc36c(Python)\uacfc \ub9ce\uc774 \ube44\uad50\ub418\uace4 \ud55c\ub2e4. \ud384\uc758 \uad6c\ubb38\uc740 \uc608\uc804\uc758 \uc140 \uc2a4\ud06c\ub9bd\ud2b8 (shell script)\ub85c\ubd80\ud130 \ub9ce\uc774 \ub530\uc654\ub2e4. \uadf8\ub798\uc11c \uad6c\uae00\ub85c \uac80\uc0c9\ud558\uae30 \uc5b4\ub824\uc6b4 \ud5f7\uac08\ub9ac\uae30 \uc26c\uc6b4 \uae30\ud638\ub4e4\uc744 \ub9ce\uc774 \uc0ac\uc6a9\ud558\ub294 \uac83\uc73c\ub85c\ub3c4 \uc720\uba85\ud558\ub2e4. \uc140 \uc2a4\ud06c\ub9bd\ud2b8\ub85c\ubd80\ud130 \uae30\uc6d0\ud55c \uae4c\ub2ed\uc5d0 \ud384\uc740 \ub2e4\ub978 \uc2a4\ud06c\ub9bd\ud2b8\ub098 \ud504\ub85c\uadf8\ub7a8\uc744 \uc5ee\uc5b4\uc8fc\ub294 \uae00\ub8e8 \ucf54\ub4dc(glue code)\ub97c \ub9cc\ub4dc\ub294\ub370 \uc544\uc8fc \uc88b\ub2e4. \ud14d\uc2a4\ud2b8 \ub370\uc774\ud130\ub97c \ucc98\ub9ac\ud558\uac70\ub098 \uc0dd\uc131\ud558\ub294\ub370 \ud384\uc740 \uc548\uc131\ub9de\ucda4\uc774\ub2e4. \ud384\uc740 \ub110\ub9ac \uc0ac\uc6a9\ub418\uace0 \uc788\uc73c\uba70 \uc778\uae30\ub3c4 \ub9ce\uc73c\uba70, \uc774\uc2dd\uc131\ub3c4 \uc88b\uace0 \uc9c0\uc6d0\ub3c4 \uc798\ub418\uace0 \uc788\ub2e4. \ud384\uc5d0\ub294 \"\uadf8 \uc77c\uc744 \ud558\ub294\ub370\uc5d4 \ud55c\uac00\uc9c0 \uc774\uc0c1\uc758 \ubc29\ubc95\uc774 \uc788\ub2e4(There's More Than One Way To Do It:TMTOWTDI)\"\ub77c\ub294 \uc124\uacc4 \ucca0\ud559\uc774 \uc788\ub2e4. \uc774\ub294 \ud30c\uc774\uc36c\uc758 \"\uadf8 \uc77c\uc744 \ud558\ub294\ub370 \uba85\ubc31\ud55c - \uadf8\ub9ac\uace0 \uac00\uae09\uc801\uc774\uba74 \uc624\uc9c1 - \ud558\ub098\uc758 \ubc29\ubc95\uc774 \uc788\uc5b4\uc57c \ud55c\ub2e4(There should be one - and preferably only one - obvious way to do it)\"\uc640 \ub300\ube44\ub41c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud384\uc5d0\ub294 \uc548\uc88b\uc740 \uc810\ub4e4\ub3c4 \uc788\uc9c0\ub9cc \uc774\ub97c \ubc8c\ucda9\ud560\ub9cc\ud07c \uc544\uc8fc \ud6cc\ub96d\ud55c \ud2b9\uc9d5\ub4e4\ub3c4 \uc788\ub2e4. \uc774\ub7f0 \uc810\uc740 \uc774\uc81c\uae4c\uc9c0 \uc788\uc5c8\ub358 \ubaa8\ub4e0 \ub2e4\ub978 \ud504\ub85c\uadf8\ub798\ubc0d \uc5b8\uc5b4\uc640 \uac19\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ub098\ub294 \ud384\uc744 \uc804\ud30c\ud558\uae30 \uc704\ud574\uc11c\uac00 \uc544\ub2c8\ub77c \uc720\uc775\ud55c \uc815\ubcf4\ub97c \uc804\ud558\ub824 \uc774 \uae00\uc744 \uc37c\uc73c\uba70 \ub098\uc640 \ube44\uc2b7\ud560 \uac78\ub85c \uc0dd\uac01\ud558\ub294 \ub2e4\uc74c\uacfc \uac19\uc740 \ucc98\uc9c0\uc5d0 \uc788\ub294 \uc0ac\ub78c\uc744 \ub300\uc0c1\uc73c\ub85c \ud588\ub2e4.<\/p>\n<ul style=\"font-family: Gulim; font-size: small;\"><li>\ub108\ubb34 \uae30\uc220\uc801\uc774\uace0 \uadf9\ub2e8\uc801\uc778 \uacbd\uc6b0\uc5d0 \ub300\ud55c \uc124\uba85\uc744 \ub9ce\uc774 \ud558\uace0 \uc788\ub294&nbsp;<a href=\"http:\/\/perl.org\/\">http:\/\/perl.org<\/a>\uc5d0 \uc788\ub294 \ud384 \uacf5\uc2dd \ubb38\uc11c\ub97c \uc2eb\uc5b4\ud558\uba70<\/li><li>\"\uc6d0\ub9ac\uc640 \uc608\uc81c\"\ub85c \uc0c8\ub85c\uc6b4 \uc5b8\uc5b4\ub97c \ube68\ub9ac \uc775\ud788\uace0 \uc2f6\uc5b4\ud558\uba70<\/li><li>\ub798\ub9ac \uc6d4(Larry Wall)\uc774 \uc694\uc810\ub9cc \ub9d0\ud558\uae30\ub97c \uc6d0\ud558\uba70<\/li><li>\uc774\ubbf8 \uc77c\ubc18\uc801\uc778 \ud504\ub85c\uadf8\ub798\ubc0d\uc744 \ud560 \uc904 \uc54c\uba70<\/li><li>\uc77c\uc744 \ub9c8\uce58\ub294\ub370 \ud544\uc694\ud55c \uc774\uc0c1\uc73c\ub85c \ud384\uc744 \uc790\uc138\ud788 \ud30c\uace0\ub4e4\uace0 \uc2f6\uc9c0\ub294 \uc54a\uc740 \uc0ac\ub78c\ub4e4<\/li><\/ul><p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub9ac\uace0 \uac00\uae09\uc801 \uc9e7\uac8c \uc4f0\ub824\uace0 \ud588\uc9c0\ub9cc \ud544\uc694\ud55c \ub0b4\uc6a9\uc740 \ube7c\ub193\uc9c0 \uc54a\uc558\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\ubbf8\ub9ac \uc54c\ub824\ub458 \ub0b4\uc6a9<\/h2><ul style=\"font-family: Gulim; font-size: small;\"><li><p>\uc774 \ubb38\uc11c\uc5d0\uc11c \uc120\uc5b8\ud558\ub4ef \ub9d0\ud558\ub294 \ub370\uc5d0\uc11c\ub294 \ub2e4\uc74c\uacfc \uac19\uc774 \ubd80\uc5f0\ud574\uc57c \ud560 \uac83\uc774\ub2e4: \"\uc774\uac83\uc740, \uc5c4\uaca9\ud558\uac8c \uc774\uc57c\uae30\ud558\uc790\uba74, \ub9de\ub294 \ub9d0\uc774 \uc544\ub2c8\ub2e4. \uc0c1\ud669\uc740 \uc2e4\uc81c\ub85c \ud6e8\uc52c \ubcf5\uc7a1\ud558\ub2e4\". \uc2ec\uac01\ud55c \ubb38\uc81c\uc810\uc744 \ubc1c\uacac\ud558\uba74 \ub098\uc5d0\uac8c \uc54c\ub824\ub77c. \ud558\uc9c0\ub9cc \ub098\ub294 \ucd08\ubcf4\uc790\ub4e4\uc744 \uc704\ud574 \ub2e8\uc21c\ud558\uac8c \uc124\uba85\ud55c \uac83\uc774\ub2e4.<\/p>\n<\/li><li><p>\uae00 \uc804\uccb4\uc801\uc73c\ub85c \uc608\uc81c\uc5d0\uc11c \ucd9c\ub825\ud558\uae30 \uc704\ud574&nbsp;<code style=\"color: rgb(52, 130, 117);\">print<\/code>&nbsp;\ubb38\uc744 \uc0ac\uc6a9\ud560 \ub54c\uc5d0\ub294 \uba85\uc2dc\uc801\uc73c\ub85c \uc904\ub118\uae40 \ucc98\ub9ac\ub97c \ud558\uc9c0 \uc54a\uc558\ub2e4. \ucd9c\ub825\ud560 \uc2e4\uc81c \ubb38\uc790\uc5f4\uc5d0 \ub354 \uc9d1\uc911\ud558\uae30 \uc704\ud574\uc11c\uc774\ub2e4. \uadf8\ub798\uc11c \ub9ce\uc740 \uc608\uc81c\ub4e4\uc774 \uc2e4\ud589\ud574\ubcf4\uba74 \"alotofwordsallsmusheduptogetherononeline\" \uc2dd\uc73c\ub85c \ucd9c\ub825\ub420 \uac83\uc774\ub2e4. \uc774\uac83\ub4e4\uc740 \ubb34\uc2dc\ud558\uba74 \ub41c\ub2e4.<\/p>\n<\/li><\/ul><h2 style=\"font-family: Gulim;\">Hello world<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ud384&nbsp;<em>\uc2a4\ud06c\ub9bd\ud2b8(script)<\/em>\ub294 \ud655\uc7a5\uc790\uac00&nbsp;<code style=\"color: rgb(52, 130, 117);\">.pl<\/code>\uc778 \uc77c\ubc18\uc801\uc778 \ud14d\uc2a4\ud2b8 \ud30c\uc77c\uc774\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ub2e4\uc74c\uc740 \uc608\uc81c\ub85c \uc0b4\ud3b4\ubcfc&nbsp;<code style=\"color: rgb(52, 130, 117);\">helloworld.pl<\/code>&nbsp;\uc2a4\ud06c\ub9bd\ud2b8\uc774\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\n<a href=\"http:\/\/perldoc.perl.org\/functions\/print.html\">print<\/a> \"Hello world\";\n<\/pre>\n\n<!-- \/wp:post-content -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud384 \uc2a4\ud06c\ub9bd\ud2b8\ub294 \ud384 \uc778\ud130\ud504\ub9ac\ud130(<code style=\"color: rgb(52, 130, 117);\">perl<\/code>&nbsp;\ub610\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">perl.exe<\/code>)\ub85c \uc2e4\ud589\ud55c\ub2e4.<\/p>\n<pre class=\"bash\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">perl helloworld.pl [arg0 [arg1 [arg2 ...]]]\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uba3c\uc800 \uc54c\ub824\ub458 \uac8c \uc788\ub2e4. \ud384\uc758 \uad6c\ubb38\uc740 \uad49\uc7a5\ud788 \uc790\uc720\ub85c\uc640\uc11c \uc5b4\ub5bb\uac8c \ub3d9\uc791\ud560\uc9c0 \uc885\uc7a1\uc744 \uc218 \uc5c6\ub294 \ubaa8\ud638\ud55c \uba85\ub839\uc744 \uc4f0\ub294 \uac83\ub3c4 \uac00\ub2a5\ud558\ub2e4. \ud558\uc9c0\ub9cc \ubaa8\ub450\ub4e4 \uc774\ub7f0 \uacbd\uc6b0\ub294 \ud53c\ud558\uace0 \uc2f6\uc5b4\ud560 \uac83\uc774\ubbc0\ub85c \uc5b4\ub5a4 \uac8c \uadf8\ub7f0 \uac74\uc9c0 \uc124\uba85\ud560 \ud544\uc694\ub294 \uc5c6\uc744 \uac83 \uac19\ub2e4. \uadf8\ub798\uc11c \uc774\ub7f0 \uc0c1\ud669\uc744 \ub9cc\ub4e4\uc9c0 \uc54a\uae30 \uc704\ud574\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">use strict; use warnings;<\/code>&nbsp;\uad6c\ubb38\uc744 \ud384 \uc2a4\ud06c\ub9bd\ud2b8 \ub610\ub294 \ubaa8\ub4c8 \uc81c\uc77c \ucc98\uc74c\uc5d0 \ub454\ub2e4. \uc774\ub7f0&nbsp;<code style=\"color: rgb(52, 130, 117);\">use foo;<\/code>&nbsp;\ud615\ud0dc\uc758 \uba85\ub839\ubb38\uc744&nbsp;<em>\ud504\ub798\uadf8\ub9c8(pragma)<\/em>\ub77c\uace0 \ud558\ub294\ub370 \uc774\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">perl.exe<\/code>\uc5d0 \ubcf4\ub0b4\ub294 \ud45c\uc9c0\ub85c\uc11c, \ud504\ub85c\uadf8\ub7a8\uc774 \uc2dc\uc791\ud558\uae30 \uc804 \uad6c\ubb38 \uac80\uc0ac\ub97c \ud560 \ub54c \uc2e4\ud589\ub418\ub294 \uac83\ub4e4\uc774\ub2e4. \uad6c\ubb38 \uac80\uc0ac\uac00 \ub05d\ub098\uace0 \ud504\ub85c\uadf8\ub7a8\uc774 \uc2dc\uc791\ub418\uba74 \uc778\ud130\ud504\ub9ac\ud130\uac00 \uc774 \uba85\ub839\ub4e4\uc744 \ub9c8\uc8fc\uccd0\ub3c4 \uc544\ubb34\ub7f0 \ub3d9\uc791\uc744 \ud558\uc9c0 \uc54a\ub294\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"># \uae30\ud638\ub85c \uc904\uc744 \uc2dc\uc791\ud558\uba74 \uadf8 \uc904 \ub05d\uae4c\uc9c0\uac00 \uc8fc\uc11d\uc774\ub2e4. \ud384\uc5d0 \ube14\ub7ed \ub2e8\uc704 \uc8fc\uc11d \uad6c\ubb38\uc740 \uc5c6\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\ubcc0\uc218(Variable)<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ud384\uc5d0\ub294&nbsp;<em>\uc2a4\uce7c\ub77c, \ubc30\uc5f4, \ud574\uc2dc<\/em>\uc758 \uc138 \uac00\uc9c0 \uc885\ub958\uc758 \ubcc0\uc218\uac00 \uc788\ub2e4. \uac01\uac01\uc744 \uace0\uc720\uc758&nbsp;<em>\uc2dc\uae38(sigil)<\/em>&nbsp;- \uc55e\uc5d0 \ubd99\uc774\ub294 \ud2b9\uc218 \ubb38\uc790 - \ub85c \uad6c\ubd84\ud55c\ub2e4: \uac01\uac01&nbsp;<code style=\"color: rgb(52, 130, 117);\">$, @, %<\/code>\uc774\ub2e4. \ubcc0\uc218\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">my<\/code>&nbsp;\uad6c\ubb38\uc73c\ub85c \uc120\uc5b8\ud558\uba70 \uac10\uc2f8\uace0 \uc788\ub294 \ube14\ub7ed\uc774 \ub05d\ub098\uac70\ub098 \uadf8\ub807\uc9c0 \uc54a\uc73c\uba74 \ud30c\uc77c \ub05d\uae4c\uc9c0 \uadf8 \ud6a8\ub825 \ubc94\uc704(scope)\uac00 \uc9c0\uc18d\ub41c\ub2e4.<\/p>\n<h3 style=\"font-family: Gulim;\">\uc2a4\uce7c\ub77c \ubcc0\uc218<\/h3><p style=\"font-family: Gulim; font-size: small;\">\uc2a4\uce7c\ub77c \ubcc0\uc218\uc5d0\ub294 \ub2e4\uc74c\uc758 \uac12\ub4e4\uc744 \ub300\uc785\ud560 \uc218 \uc788\ub2e4.<\/p>\n<ul style=\"font-family: Gulim; font-size: small;\"><li><code style=\"color: rgb(52, 130, 117);\">undef<\/code>&nbsp;(\ud30c\uc774\uc36c\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">None<\/code>, PHP\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">null<\/code>)<\/li><li>\uc22b\uc790 (\ud384\uc5d0\uc11c\ub294 \uc815\uc218\uac12\uacfc \uc2e4\uc218\uac12\uc744 \uad6c\ubcc4\ud558\uc9c0 \uc54a\ub294\ub2e4)<\/li><li>\ubb38\uc790\uc5f4<\/li><li>\ub2e4\ub978 \ubcc0\uc218\uc5d0 \ub300\ud55c \ucc38\uc870(reference)<\/li><\/ul><pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $undef = undef;\nprint $undef; # \uacbd\uace0(warning)\uac00 \ubc1c\uc0dd\ud558\uba70 \ube48 \ubb38\uc790\uc5f4(\"\")\uc744 \ucd9c\ub825\ud55c\ub2e4.\n\n# \ubb35\uc2dc\uc801\uc778 undef\nmy $undef2;\nprint $undef2; # \uc704\uc640 \uac19\uc740 \uacbd\uace0 \ucd9c\ub825\n\nmy $num = 4040.5;\nprint $num; # \"4040.5\"\n\nmy $string = \"world\";\nprint $string; # \"world\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">(\ucc38\uc870\ub294 \uc870\uae08 \uc788\ub2e4\uac00 \ub2e4\ub8e8\uaca0\ub2e4.)<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ubb38\uc790\uc5f4 \uacb0\ud569\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">.<\/code>&nbsp;\uc5f0\uc0b0\uc790\ub85c \ud55c\ub2e4(PHP\uc640 \uac19\ub2e4):<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"Hello \".$string; # \"Hello world\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\ubd88\ub9ac\uc5b8(Boolean)<\/h3><p style=\"font-family: Gulim; font-size: small;\"><strong>\ud384\uc5d0\ub294 \ubd88\ub9ac\uc5b8 \ub370\uc774\ud130\ud615\uc774 \uc5c6\ub2e4<\/strong>. \ub9cc\uc57d \uc2a4\uce7c\ub77c\uac00&nbsp;<code style=\"color: rgb(52, 130, 117);\">if<\/code>&nbsp;\ubb38 \uc548\uc5d0 \uc788\ub2e4\uba74 \ub2e4\uc74c\uacfc \uac19\uc740 \uacbd\uc6b0\uc5d0\ub9cc \ubd88\ub9ac\uc5b8 \"false\" \uac12\uc774 \ub41c\ub2e4:<\/p>\n<ul style=\"font-family: Gulim; font-size: small;\"><li><code style=\"color: rgb(52, 130, 117);\">undef<\/code><\/li><li>\uc22b\uc790&nbsp;<code style=\"color: rgb(52, 130, 117);\">0<\/code><\/li><li>\ubb38\uc790\uc5f4&nbsp;<code style=\"color: rgb(52, 130, 117);\">\"\"<\/code><\/li><li>\ubb38\uc790\uc5f4&nbsp;<code style=\"color: rgb(52, 130, 117);\">\"0\"<\/code><\/li><\/ul><p style=\"font-family: Gulim; font-size: small;\">\ud384 \ubb38\uc11c\ub97c \ubcf4\ub2e4\ubcf4\uba74 \ud568\uc218\ub4e4\uc774 \"\ucc38(true)\"\uacfc \"\uac70\uc9d3(false)\" \uac12\uc744 \ubc18\ud658\ud55c\ub2e4\uace0 \ud558\ub294 \uac83\uc774 \ub9ce\uc774 \uc788\ub2e4. \uc2e4\uc81c\ub85c\ub294 \uc5b4\ub5a4 \ud568\uc218\uac00 \"\ucc38\"\uc744 \ubc18\ud658\ud558\ub2e4\ub77c\uace0 \ud558\ub294 \uac83\uc740 \ubcf4\ud1b5&nbsp;<code style=\"color: rgb(52, 130, 117);\">1<\/code>\uc744 \ubc18\ud658\ud558\ub294 \uac83\uc774\uace0 \"\uac70\uc9d3\"\uc744 \ubc18\ud658\ud55c\ub2e4\uace0 \ud558\ub294 \uac83\uc740 \ubcf4\ud1b5 \ube48 \ubb38\uc790\uc5f4&nbsp;<code style=\"color: rgb(52, 130, 117);\">\"\"<\/code>\uc744 \ubc18\ud658\ud558\ub294 \uac83\uc774\ub2e4.<\/p>\n<h3 style=\"font-family: Gulim;\">\uc57d\ud55c \ud0c0\uc785(Weak typing)<\/h3><p style=\"font-family: Gulim; font-size: small;\"><strong>\uc2a4\uce7c\ub77c\uc5d0 \ub300\uc785\ub41c \uac12\uc774 \"\uc22b\uc790\"\uc778\uc9c0 \"\ubb38\uc790\uc5f4\"\uc778\uc9c0 \ud655\uc778\ud558\ub294 \uac83\uc740 \ubd88\uac00\ub2a5\ud558\ub2e4<\/strong>. \uc815\ud655\ud558\uac8c \ub9d0\ud558\uc790\uba74 \uadf8\ub7f4 \ud544\uc694\uac00 \uc5c6\uc5b4\uc57c \ud55c\ub2e4. \uc65c\ub0d0\ud558\uba74 \uc0ac\uc6a9\ud558\ub294 \uc5f0\uc0b0\uc790\uc5d0 \ub530\ub77c \uc2a4\uce7c\ub77c\ub97c \uc22b\uc790\ub85c \ucde8\uae09\ud560\uc9c0 \ub610\ub294 \ubb38\uc790\uc5f4\ub85c \ucde8\uae09\ud560\uc9c0\uac00 \uacb0\uc815\ub418\uae30 \ub54c\ubb38\uc774\ub2e4. \ubb38\uc790\uc5f4\ub85c \uc0ac\uc6a9\ud558\uba74 \ubb38\uc790\uc5f4\ucc98\ub7fc \ub3d9\uc791\ud558\uace0 \uc22b\uc790\ub85c \uc0ac\uc6a9\ud558\uba74 \uc22b\uc790\ub85c \ub3d9\uc791\ud558\ub294 \uac83\uc774\ub2e4(\uadf8\uac83\uc774 \ubd88\uac00\ub2a5\ud558\uba74 \uacbd\uace0\uac00 \ubc1c\uc0dd\ud55c\ub2e4):<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $str1 = \"4G\";\nmy $str2 = \"4H\";\n\nprint $str1 .  $str2; # \"4G4H\"\nprint $str1 +  $str2; # \"8\" \uacbd\uace0\uac00 2\uac1c \ubc1c\uc0dd\ud55c\ub2e4.\nprint $str1 eq $str2; # \"\" (\ube48 \ubb38\uc790\uc5f4. \uc989 false)\nprint $str1 == $str2; # \"1\" \uacbd\uace0\uac00 2\uac1c \ubc1c\uc0dd\n\n# \uace0\uc804\uc801\uc778 \uc2e4\uc218 \uc0ac\ub840\nprint \"yes\" == \"no\"; # \"1\" \uc989 \ucc38. \uacbd\uace0\uac00 2\uac1c \ubc1c\uc0dd. \uc22b\uc790\ub85c \uc0ac\uc6a9\ub418\uc5c8\uae30\uc5d0 \ub450 \uac1c \ubaa8\ub450 0\uc774 \ub41c\ub2e4\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc989 \uc2a4\uce7c\ub77c\ub97c \uc22b\uc790\ub85c \ucde8\uae09\ud560\uc9c0 \ubb38\uc790\uc5f4\ub85c \ucde8\uae09\ud560\uc9c0 \uc815\ud574\uc11c \uac01\uac01 \uacbd\uc6b0\uc5d0 \ub9de\uac8c \uc815\ud655\ud788 \uc5f0\uc0b0\uc790\ub97c \uc0ac\uc6a9\ud574\uc57c \ud55c\ub2e4. \uadf8\ub798\uc11c \uc2a4\uce7c\ub77c\ub97c \uc22b\uc790\ub85c \ucde8\uae09\ud558\uc5ec \ube44\uad50\ud558\ub294 \uc5f0\uc0b0\uc790\uc640 \ubb38\uc790\uc5f4\ub85c \ucde8\uae09\ud558\uc5ec \ube44\uad50\ud558\ub294 \uc5f0\uc0b0\uc790\uac00 \uac01\uac01 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\"># \uc22b\uc790\ub85c \ucde8\uae09\ud558\uc5ec \ube44\uad50\ud558\ub294 \uc5f0\uc0b0\uc790:  &lt;,  &gt;, &lt;=, &gt;=, ==, !=, &lt;=&gt;, +, *\n# \ubb38\uc790\uc5f4\ub85c \ucde8\uae09\ud558\uc5ec \ube44\uad50\ud558\ub294 \uc5f0\uc0b0\uc790:  <a href=\"http:\/\/perldoc.perl.org\/perlop.html#Equality-Operators\">lt, gt, le, ge, eq, ne, cmp<\/a>, <a href=\"http:\/\/perldoc.perl.org\/perlop.html#Additive-Operators\">.<\/a>, <a href=\"http:\/\/perldoc.perl.org\/perlop.html#Multiplicative-Operators\">x<\/a>\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\ubc30\uc5f4 \ubcc0\uc218<\/h3><p style=\"font-family: Gulim; font-size: small;\">0\ubd80\ud130 \uc2dc\uc791\ud558\ub294 \uc815\uc218 \uc778\ub371\uc2a4\ub97c \uac00\uc9c4 \uc2a4\uce7c\ub77c\ub4e4\uc758 \ub9ac\uc2a4\ud2b8\ub97c \ubc30\uc5f4 \ubcc0\uc218\ub77c \ud55c\ub2e4. \ud30c\uc774\uc36c\uc758&nbsp;<em>list<\/em>, PHP\uc758&nbsp;<em>array<\/em>\uc5d0 \ud574\ub2f9\ud55c\ub2e4. \ubc30\uc5f4\uc740 \uc2a4\uce7c\ub77c \ub9ac\uc2a4\ud2b8\ub97c \uad04\ud638\ub85c \uac10\uc2f8\uc11c \uc120\uc5b8\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array = (\n    \"print\",\n    \"these\",\n    \"strings\",\n    \"out\",\n    \"for\",\n    \"me\", # \ub9c8\uc9c0\ub9c9\uc5d0 \uc27c\ud45c\uac00 \uc788\uc5b4\ub3c4 \ubb38\uc81c\uc5c6\ub2e4\n);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc5d0\uc11c \uac01\uac01\uc758 \uc6d0\uc18c\uac12\uc5d0 \uc811\uadfc\ud558\ub824\uba74 \ub2ec\ub7ec \uae30\ud638($)\ub97c \uc0ac\uc6a9\ud574\uc57c \ud55c\ub2e4.&nbsp;<em>\uc5bb\ub294<\/em>&nbsp;\uac12\uc774 \ubc30\uc5f4\uc774 \uc544\ub2c8\uace0 \uc2a4\uce7c\ub77c\uc774\uae30 \ub54c\ubb38\uc5d0 \uc774\ub807\uac8c \ud558\ub294 \uac83\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $array[0]; # \"print\"\nprint $array[1]; # \"these\"\nprint $array[2]; # \"strings\"\nprint $array[3]; # \"out\"\nprint $array[4]; # \"for\"\nprint $array[5]; # \"me\"\nprint $array[6]; # \uacbd\uace0 \ubc1c\uc0dd, undef \ubc18\ud658, \"\"\uac00 \ucd9c\ub825\ub428\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc758 \ub9c8\uc9c0\ub9c9 \uc6d0\uc18c\ubd80\ud130 \uc55e\ucabd\uc73c\ub85c \uc138\uba74\uc11c \uc778\ub371\uc2a4\ub97c \uc9c0\uc815\ud558\ub824\uba74 \uc74c\uc218\ub97c \uc0ac\uc6a9\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $array[-1]; # \"me\"\nprint $array[-2]; # \"for\"\nprint $array[-3]; # \"out\"\nprint $array[-4]; # \"strings\"\nprint $array[-5]; # \"these\"\nprint $array[-6]; # \"print\"\nprint $array[-7]; # \uacbd\uace0 \ubc1c\uc0dd, undef \ubc18\ud658, \"\"\uac00 \ucd9c\ub825\ub428\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc2a4\uce7c\ub77c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$var<\/code>\uc640 \ubc30\uc5f4&nbsp;<code style=\"color: rgb(52, 130, 117);\">@var<\/code>, \uadf8\ub9ac\uace0 \uadf8 \uc6d0\uc18c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$var[0]<\/code>\ub294 \uc11c\ub85c \uad6c\ubcc4\ub418\uae30\uc5d0&nbsp;<br \/>\ub3d9\uc2dc\uc5d0 \uc0ac\uc6a9\ud574\ub3c4 \ub41c\ub2e4. \ud558\uc9c0\ub9cc \ucf54\ub4dc\ub97c \uc77d\uae30\uc5d4 \ud63c\ub780\ud560 \uc218 \uc788\uc73c\ubbc0\ub85c \ud63c\uc6a9\ud574\uc11c \uc4f0\uc9c0 \uc54a\ub294 \uac8c \uc88b\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc758 \uae38\uc774\ub97c \uad6c\ud558\ub824\uba74 \ub2e4\uc74c\uacfc \uac19\uc774 \ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"This array has \".(scalar @array).\"elements\"; # \"This array has 6 elements\"\nprint \"The last populated index is \".$#array;       # \"The last populated index is 5\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud384 \uc2a4\ud06c\ub9bd\ud2b8\uac00 \uc2e4\ud589\ub420 \ub54c\uc758 \uba85\ub839\ud589 \uc778\uc790\ub4e4\uc740&nbsp;<a href=\"http:\/\/perldoc.perl.org\/perlvar.html\">\ub0b4\uc7a5 \ubc30\uc5f4 \ubcc0\uc218(built-in array variable)<\/a>\uc778&nbsp;<code style=\"color: rgb(52, 130, 117);\">@ARGV<\/code>\uc5d0 \uc800\uc7a5\ub41c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ubcc0\uc218\ub4e4\uc740 \ubb38\uc790\uc5f4\uc5d0 \ub07c\uc6cc\uc9c8(interpolated) \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"Hello $string\"; # \"Hello world\"\nprint \"@array\";        # \"print these strings out for me\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><strong>\uc8fc\uc758\ud560 \uc810<\/strong>: \uc774\uba54\uc77c \uc8fc\uc18c\ub97c&nbsp;<code style=\"color: rgb(52, 130, 117);\">\"jeff@gmail.com\"<\/code>\uacfc \uac19\uc740 \uc2dd\uc73c\ub85c \ubb38\uc790\uc5f4\ub85c \ub9cc\ub4e4\uba74 \ud384\uc740 \ubc30\uc5f4 \ubcc0\uc218&nbsp;<code style=\"color: rgb(52, 130, 117);\">@gmail<\/code>\uc774 \ubb38\uc790\uc5f4\uc5d0 \ub07c\uc6cc\uc84c\ub2e4\uace0 \uc0dd\uac01\ud558\uace0 \ubb38\uc790\uc5f4\uc744 \ud574\uc11d\ud55c\ub2e4. \uadf8\ub798\uc11c \uc774 \ubcc0\uc218\ub97c \ucc3e\uc744 \uc218 \uc5c6\uc73c\uba74, \uc2e4\ud589 \uc911 \uc5d0\ub7ec(runtime error)\ub97c \ubc1c\uc0dd\uc2dc\ud0a8\ub2e4. \uc5ec\uae30\uc11c \ubc30\uc5f4 \ubcc0\uc218\ub85c \ud574\uc11d\ud558\uc9c0 \uc54a\ub3c4\ub85d \ud558\ub824\uba74 \ubc31\uc2ac\ub798\uc2dc()\ub85c \uc2dc\uae38\uc744 \ud0c8\ucd9c(escape)\uc2dc\ud0a4\uac70\ub098, \ud070 \ub530\uc634\ud45c\ub97c \uc4f0\uc9c0 \ub9d0\uace0 \uc791\uc740 \ub530\uc634\ud45c(')\ub97c \uc0ac\uc6a9\ud558\uba74 \ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"Hello, \\$string\"; # \"Hello $string\"\nprint 'Hello, $string'; # \"Hello $string\"\nprint \"\\@array\"; # \"@array\"\nprint '@array'; # \"@array\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\ud574\uc2dc \ubcc0\uc218<\/h3><p style=\"font-family: Gulim; font-size: small;\">\ubb38\uc790\uc5f4\ub85c \uc778\ub371\uc2a4\ub41c \uc2a4\uce7c\ub77c \ubaa9\ub85d\uc744 \ud574\uc2dc \ubcc0\uc218\ub77c \ud55c\ub2e4. \ud30c\uc774\uc36c\uc5d0\uc11c\ub294&nbsp;<em>dictionary<\/em>\ub77c \ud558\uace0 PHP\uc5d0\uc11c\ub294&nbsp;<em>array<\/em>\ub77c \ud558\ub294 \uac83\uc774\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my %scientists = (\n    \"Newton\" =&gt; \"Isaac\",\n    \"Einstein\" =&gt; \"Albert\",\n    \"Darwin\" =&gt; \"Charles\",\n);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc744 \uc120\uc5b8\ud558\ub294 \ubc29\uc2dd\uacfc \ube44\uc2b7\ud55c \uac83\uc744 \uc54c \uc218 \uc788\ub2e4. \uc2e4\uc81c\ub85c \uc774\uc911 \ud654\uc0b4\ud45c \uae30\ud638&nbsp;<code style=\"color: rgb(52, 130, 117);\">=&gt;<\/code>&nbsp;\ub294 \uc27c\ud45c \uad6c\ubd84\uc790\uc758 \ubcc4\uce6d\uc5d0 \uc9c0\ub098\uc9c0 \uc54a\uae30 \ub54c\ubb38\uc5d0 \"\ub6b1\ub6b1\ud55c \uc27c\ud45c(fat comma)\"\ub77c\uace0\ub3c4 \ubd80\ub978\ub2e4.&nbsp;<br \/>\ud574\uc2dc\ub294 \uc9dd\uc218 \uac1c\uc758 \uc6d0\uc18c\uac00 \uc788\ub294 \ub9ac\uc2a4\ud2b8\ub85c \uc120\uc5b8\ud558\uba70, \uc9dd\uc218\ubc88\uc9f8 \uc6d0\uc18c(0, 2, ...\ubc88\uc9f8)\ub294 \ubb38\uc790\uc5f4\ub85c \ucde8\uae09\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uacfc \ub9c8\ucc2c\uac00\uc9c0\ub85c, \uc5bb\ub294 \uac12\uc774 \uc2a4\uce7c\ub77c\uc774\uae30 \ub54c\ubb38\uc5d0, \ud574\uc2dc\uc758 \uc6d0\uc18c\uc5d0 \uc811\uadfc\ud560 \ub54c\ub294 \ub2ec\ub7ec \uae30\ud638($)\ub97c \uc0ac\uc6a9\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $scientists{\"Newton\"}; # \"Isaac\"\nprint $scientists{\"Einstein\"}; # \"Albert\"\nprint $scientists{\"Darwin\"}; # \"Charles\"\nprint $scientists{\"Dyson\"}; # \uacbd\uace0\ub97c \ubc1c\uc0dd\ud558\uba70, undef \ub97c \ubc18\ud658\ud55c\ub2e4. \ucd9c\ub825\uc740 \"\"\uc774\ub2e4.\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30\uc11c\ub294 \uc911\uad04\ud638({, })\ub97c \uc0ac\uc6a9\ud55c\ub2e4. \ubc30\uc5f4\uc758 \uacbd\uc6b0\uc640 \uac19\uc774 \uc2a4\uce7c\ub77c \ubcc0\uc218&nbsp;<code style=\"color: rgb(52, 130, 117);\">$var<\/code>\uc640 \uc2a4\uce7c\ub77c \uc6d0\uc18c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$var{\"foo\"}<\/code>\ub97c \uac00\uc9c4 \ud574\uc2dc \ubcc0\uc218&nbsp;<code style=\"color: rgb(52, 130, 117);\">%var<\/code>\uc5d0 \uc774\ub984 \ucda9\ub3cc\uc740 \uc5c6\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud574\uc2dc\ub294 \ubc14\ub85c \ubc30\uc5f4\ub85c \ubcc0\ud658\ud560 \uc218 \uc788\ub2e4. \uc774 \uacbd\uc6b0 \ubc30\uc5f4\uc740 \ud574\uc2dc\uc758 \ud0a4\uac12\uacfc \uc6d0\uc18c\uac12\uc774 \ubc88\uac08\uc544 \ub098\uc5f4\ub418\uc11c \ud574\uc2dc\uc758 \ub450 \ubc30 \ud06c\uae30\uac00 \ub41c\ub2e4(\ubc18\ub300\ub85c \ubc30\uc5f4\uc744 \ud574\uc2dc\ub85c \ubcc0\ud658\ud558\ub294 \uac83\ub3c4 \ubc14\ub85c \ub41c\ub2e4):<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @scientists = %scientists;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc8fc\uc758\ud560 \uc810\uc740 \ubc30\uc5f4\uacfc\ub294 \ub2ec\ub9ac \ud574\uc2dc\ub294 \ud0a4\uac12\uc5d0 \ub530\ub978 \uc21c\uc11c\uac00 \uc5c6\ub2e4\ub294 \uac83\uc774\ub2e4. \uc5b4\ub5a4 \uc21c\uc11c\ub4e0 \ub354 \ud6a8\uc728\uc801\uc778 \ubc29\uc2dd\uc73c\ub85c \uc21c\uc11c\ub97c \uc815\ud55c\ub2e4. \uadf8\ub798\uc11c \ud0a4 - \uac12\uc758 \uc30d\uc740 \uc720\uc9c0\ub418\uc9c0\ub9cc \uc21c\uc11c\ub294 \uc870\uc815\ub418\ub294 \ud604\uc0c1\uc744 \ubcfc \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"@scientists\"; # \"Einstein Albert Darwin Charles Newton Isaac\" \uc2dd\uc73c\ub85c \ucd9c\ub825\ub41c\ub2e4\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub9c8\uc9c0\ub9c9\uc73c\ub85c, \ubc30\uc5f4\ub85c\ubd80\ud130 \uac12\uc744 \uc5bb\uc73c\ub824\uba74&nbsp;<em>\ub300\uad04\ud638([,])<\/em>\ub97c \uc0ac\uc6a9\ud558\uace0 \ud574\uc2dc\ub85c\ubd80\ud130 \uac12\uc744 \uc5bb\uc73c\ub824\uba74&nbsp;<em>\uc911\uad04\ud638({,})<\/em>\ub97c \uc0ac\uc6a9\ud55c\ub2e4\ub294 \uc810\uc744 \uae30\uc5b5\ud574 \ub450\uc790. \ub300\uad04\ud638\ub294 \uc22b\uc790 \uc5f0\uc0b0\uc790\ub85c, \uc911\uad04\ud638\ub294 \ubb38\uc790\uc5f4 \uc5f0\uc0b0\uc790\ub85c \uc791\ub3d9\ud55c\ub2e4. \uc778\ub371\uc2a4 \uac12\uc73c\ub85c \uc22b\uc790\ub97c \uc4f0\ub294\uc9c0, \ubb38\uc790\uc5f4\uc744 \uc4f0\ub294\uc9c0\ub294 \uc544\ubb34 \uc758\ubbf8\uac00 \uc5c6\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $data = \"orange\";\nmy @data = (\"purple\");\nmy %data = (\"0\" =&gt; \"blue\");\n\nprint $data; # \"orange\"\nprint $data[0]; # \"purple\"\nprint $data[\"0\"]; # \"purple\"\nprint $data{0}; # \"blue\"\nprint $data{\"0\"}; # \"blue\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\ub9ac\uc2a4\ud2b8(List)<\/h3><p style=\"font-family: Gulim; font-size: small;\">\ud384\uc5d0\uc11c&nbsp;<em>\ub9ac\uc2a4\ud2b8<\/em>\ub294 \ubc30\uc5f4\uc774\ub098 \ud574\uc2dc\uc640\ub294 \ub2e4\ub978 \uc874\uc7ac\uc774\ub2e4. \ud558\uc9c0\ub9cc \uc774\ubbf8 \ub9ac\uc2a4\ud2b8\uac00 \ub098\uc624\uae34 \ud588\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">(\n    \"print\",\n    \"these\",\n    \"strings\",\n    \"out\",\n    \"for\",\n    \"me\",\n)\n\n(\n    \"Newton\" =&gt; \"Isaac\",\n    \"Einstein\" =&gt; \"Albert\",\n    \"Darwin\" =&gt; \"Charles\",\n)\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><strong>\ub9ac\uc2a4\ud2b8\ub294 \ubcc0\uc218\uac00 \uc544\ub2c8\ub2e4.<\/strong>&nbsp;\ub9ac\uc2a4\ud2b8\ub294 \ubc30\uc5f4\uc774\ub098 \ud574\uc2dc \ubcc0\uc218\uc5d0 \ub300\uc785\ub418\uae30 \uc704\ud574 \uc7a0\uae50 \uc0dd\uc131\ub418\ub294 \uac12\uc774\ub2e4. \uadf8\ub798\uc11c \ubc30\uc5f4\uc744 \uc120\uc5b8\ud558\ub294 \uad6c\ubb38\uacfc \ud574\uc2dc\ub97c \uc120\uc5b8\ud558\ub294 \uad6c\ubb38\uc774 \uac19\uc740 \uac83\uc774\ub2e4. \"\ub9ac\uc2a4\ud2b8\"\uc640 \"\ubc30\uc5f4\"\uc774\ub77c\ub294 \ub2e8\uc5b4\ub97c \uc11c\ub85c \ubc14\uafd4\uc11c \uc368\ub3c4 \uc0c1\uad00\uc5c6\ub294 \uacbd\uc6b0\ub294 \ub9ce\ub2e4. \ud558\uc9c0\ub9cc \uadf8\ub7f0 \uacbd\uc6b0\ub9cc\ud07c \ub610 \ubbf8\ubb18\ud558\uac8c \ub2e4\ub974\uace0 \uc644\uc804\ud788 \ud5f7\uac08\ub9ac\uac8c \ub3d9\uc791\ud558\ub294 \uacbd\uc6b0\ub3c4 \ub9ce\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc790 \uc5b4\uca0c\ub4e0,&nbsp;<code style=\"color: rgb(52, 130, 117);\">=&gt;<\/code>\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">,<\/code>\uc758 \ub2e4\ub978 \ud615\ud0dc\uc77c \ubfd0\uc774\ub77c\ub294 \uc810\uc744 \uae30\uc5b5\ud558\uba70 \ub2e4\uc74c \uc608\ub97c \ubcf4\uc790<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">(\"one\", 1, \"three\", 3, \"five\", 5)\n(\"one\" =&gt; 1, \"three\" =&gt; 3, \"five\" =&gt; 5)\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">=&gt;<\/code>\ub97c \uc0ac\uc6a9\ud574\uc11c \uc5b4\ub5a4 \ub9ac\uc2a4\ud2b8\ub294 \ubc30\uc5f4 \uc120\uc5b8\uc774\uba70 \ub610\ub2e4\ub978 \ub9ac\uc2a4\ud2b8\ub294 \ud574\uc2dc \uc120\uc5b8\uc774\ub77c\ub294 \ud78c\ud2b8\ub97c \uc904 \uc218 \uc788\ub2e4. \uadf8\ub7ec\ub098 \uadf8\uac83 \uc790\uccb4\ub85c\ub294 \ub458 \uc911 \uc5b4\ub5a4 \uac83\ub3c4 \uc120\uc5b8\ud558\uc9c0 \uc54a\ub294\ub2e4. \uadf8\uac83\ub4e4\uc740 \uadf8\uc800 \ub9ac\uc2a4\ud2b8\uc77c \ubfd0\uc774\ub2e4. \ub354\uad6c\ub098&nbsp;<em>\ub2e4\ub97c \ubc14 \uc5c6\ub294 \uac19\uc740 \ub9ac\uc2a4\ud2b8\uc774\ub2e4<\/em>.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uac8c\ub2e4\uac00 \uc774\ub7f0 \uc120\uc5b8\uc778 \uacbd\uc6b0\ub294:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">()\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc544\uc608 \ud78c\ud2b8\uc870\ucc28 \uc5c6\ub2e4. \uc774 \ub9ac\uc2a4\ud2b8\ub294 \ube48 \ubc30\uc5f4\uc744 \uc120\uc5b8\ud560 \ub54c\uc5d0\ub3c4 \ube48 \ud574\uc2dc\ub97c \uc120\uc5b8\ud560 \ub54c\uc5d0\ub3c4 \uc0ac\uc6a9\ud560 \uc218 \uc788\uc73c\uba70&nbsp;<code style=\"color: rgb(52, 130, 117);\">perl<\/code>&nbsp;\uc778\ud130\ud504\ub9ac\ud130\uac00 \uc5b4\ub290 \ucabd\uc778\uc9c0 \uc54c \uc218 \uc788\ub294 \ubc29\ubc95\uc740 \uc5c6\ub2e4. \uc774\ub7f0 \ud2b9\uc774\ud55c \uce21\uba74\uc744 \uc774\ud574\ud55c\ub2e4\uba74,&nbsp;<strong>\ub9ac\uc2a4\ud2b8\ub294 \uc911\ucca9\ud560 \uc218 \uc5c6\ub2e4<\/strong>\uace0 \ud560 \uc218\ubc16\uc5d0 \uc5c6\ub294 \uc774\uc720\ub3c4 \uc774\ud574\ud560 \uc218 \uc788\uc744 \uac83\uc774\ub2e4. \ub2e4\uc74c\uc744 \uc2dc\ub3c4\ud574 \ubcf4\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array = (\n    \"apples\",\n    \"bananas\",\n    (\n        \"inner\",\n        \"list\",\n        \"several\",\n        \"entries\",\n    ),\n    \"cherries\",\n);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud384\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">(\"inner\", \"list\", \"several\", \"entries\")<\/code>\ub97c \ubc30\uc5f4\ub85c \ubd10\uc57c\ud560\uc9c0 \ud574\uc2dc\ub85c \ubd10\uc57c\ud560\uc9c0 \uacb0\uc815\ud560 \uc218 \uc5c6\ub2e4. \uadf8\ub798\uc11c \ud384\uc740 \uc5b4\ub290\ucabd\ub3c4 \uc544\ub2c8\uace0&nbsp;<strong>\ub9ac\uc2a4\ud2b8\ub97c \ud558\ub098\uc758 \uae34 \ub9ac\uc2a4\ud2b8\ub85c \ud3bc\uccd0\ubc84\ub9b0\ub2e4<\/strong>:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $array[0]; # \"apples\"\nprint $array[1]; # \"bananas\"\nprint $array[2]; # \"inner\"\nprint $array[3]; # \"list\"\nprint $array[4]; # \"several\"\nprint $array[5]; # \"entries\"\nprint $arrya[6]; # \"cherries\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc774\uac74 \ub6b1\ub6b1\ud55c \uc27c\ud45c\ub97c \uc368\ub3c4 \ub9c8\ucc2c\uac00\uc9c0\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my %hash = (\n    \"beer\" =&gt; \"good\",\n    \"bananas\" =&gt; (\n        \"green\" =&gt; \"wait\",\n        \"yellow\" =&gt; \"eat\",\n    ),\n);\n\n# \uc704\uc758 \uacbd\uc6b0 \uacbd\uace0(warning)\uac00 \ubc1c\uc0dd\ud55c\ub2e4. \ud574\uc2dc\uac00 7\uac1c\uc758 \uc694\uc18c\ub85c \uc120\uc5b8\ub418\uae30 \ub54c\ubb38\uc774\ub2e4\n\nprint $hash{\"beer\"}; # \"good\"\nprint $hash{\"bananas\"}; # \"green\"\nprint $hash{\"wait\"}; # \"yellow\"\nprint $hash{\"eat\"}; # undef, \uadf8\ub798\uc11c \"\"\uac00 \ucd9c\ub825\ub418\uace0 \uacbd\uace0\uac00 \ubc1c\uc0dd\ud55c\ub2e4\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubb3c\ub860, \uc774 \uc810\uc744 \uc774\uc6a9\ud558\uc5ec \uc5ec\ub7ec \ubc30\uc5f4\uc744 \uac04\ub2e8\ud558\uac8c \ud569\uce60 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @bones = (\"humerus\", (\"jaw, \"skull\"), \"tibia\");\nmy @fingers = (\"thumb\", \"index\", \"middle\", \"ring\", \"little\");\nmy @parts = (@bones, @fingers, (\"foot\", \"toes\"), \"eyeball\", \"knuckle\");\nprint @parts;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">More on this shortly.<\/p>\n<h2 style=\"font-family: Gulim;\">\ubb38\ub9e5(Context)<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ud384\uc758 \uac00\uc7a5 \ub3c5\ud2b9\ud55c \ud2b9\uc9d5\uc740 \ucf54\ub4dc\uac00 \ubb38\ub9e5\uc5d0 \uc601\ud5a5\uc744 \ubc1b\ub294\ub2e4(context-sensitive)\ub294 \uc810\uc774\ub2e4.&nbsp;<strong>\ubaa8\ub4e0 \ud384 \ud45c\ud604\uc2dd\uc740 \uacb0\uacfc\ub85c \uc2a4\uce7c\ub77c\ub97c \uc0dd\uc131\ud560\uc9c0 \ub9ac\uc2a4\ud2b8\ub97c \uc0dd\uc131\ud560\uc9c0\uc5d0 \ub530\ub77c \uc2a4\uce7c\ub77c \ubb38\ub9e5 \ub610\ub294 \ub9ac\uc2a4\ud2b8 \ubb38\ub9e5 \uc911 \ud558\ub098\uc5d0\uc11c \ud3c9\uac00\ub41c\ub2e4<\/strong>. \ub9ce\uc740 \ud384 \ud45c\ud604\uc2dd\uacfc&nbsp;<a href=\"http:\/\/perldoc.perl.org\/perlfunc.html\">\ub0b4\uc7a5 \ud568\uc218(built-in functions)<\/a>\uac00 \ud3c9\uac00\ub418\ub294 \ubb38\ub9e5\uc5d0 \ub530\ub77c \uc544\uc8fc \ub2e4\ub974\uac8c \ub3d9\uc791\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">$scalar =<\/code>\uc640 \uac19\uc740 \uc2a4\uce7c\ub77c \ub300\uc785\uc2dd\uc758 \uacbd\uc6b0 \ud45c\ud604\uc2dd\uc740 \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0 \uc788\uac8c \ub41c\ub2e4. \uc774\ub7f0 \uacbd\uc6b0,&nbsp;<code style=\"color: rgb(52, 130, 117);\">\"Mendeleev\"<\/code>\uc640 \uac19\uc740 \ud45c\ud604\uc2dd\uc740 \uac19\uc740 \uc2a4\uce7c\ub77c \uac12&nbsp;<code style=\"color: rgb(52, 130, 117);\">\"Mendeleev\"<\/code>\ub85c \ud3c9\uac00\ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $scalar = \"Mendeleev\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">@array =<\/code>&nbsp;\ub610\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">%hash =<\/code>\uc640 \uac19\uc740 \ubc30\uc5f4 \ub610\ub294 \ud574\uc2dc \ub300\uc785\ubb38\uc740 \ud45c\ud604\uc2dd\uc744 \ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c \ud3c9\uac00\ud55c\ub2e4. \ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c \ub9ac\uc2a4\ud2b8 \uac12\uc744 \ud3c9\uac00\ud558\uba74 \ub9ac\uc2a4\ud2b8\uac00 \ubc18\ud658\ub418\uc5b4 \ubc30\uc5f4\uc774\ub098 \ud574\uc2dc\ub85c \ub4e4\uc5b4\uac00\uac8c \ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array = (\"Alpha\", \"Beta\", \"Gamma\", \"Pie\");\nmy %hash = (\"Alpha\" =&gt; \"Beta\", \"Gamma\" =&gt; \"Pie\");\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30\uae4c\uc9c4 \ubcc4\uac70\uc5c6\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c \uc2a4\uce7c\ub77c \ud45c\ud604\uc2dd\uc774 \ud3c9\uac00\ub418\uba74 1\uac1c\uc758 \uc694\uc18c\ub97c \uac00\uc9c4 \ub9ac\uc2a4\ud2b8\ub85c \ud3c9\uac00\ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array = \"Mendeleev\"; # my @array = (\"Mendeleev\"); \uc640 \uac19\uc740 \uacb0\uacfc\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub9ac\uc2a4\ud2b8 \ud45c\ud604\uc2dd\uc774 \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c \ud3c9\uac00\ub418\uba74 \ub9ac\uc2a4\ud2b8\uc758 \ub9c8\uc9c0\ub9c9 \uc694\uc18c\uac00 \ubc18\ud658\ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $scalar = (\"Alpha\", \"Beta\", \"Gamma\", \"Pie\"); # $scalar\uc758 \uac12\uc740 \"Pie\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc2dd(\ubc30\uc5f4\uc740 \ub9ac\uc2a4\ud2b8\uc640 \ub2e4\ub978 \uac83\uc774\ub77c\ub294 \uc810\uc744 \uae30\uc5b5\ud558\uba74)\uc740 \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c \ubc30\uc5f4\uc758 \uae38\uc774\ub85c \ud3c9\uac00\ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array = (\"Alpha\", \"Beta\", \"Gamma\", \"Pie\");\nmy $scalar = @array; # $scalar\uc758 \uac12\uc740 4\uc774\ub2e4\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/print.html\">print<\/a>&nbsp;\ub0b4\uc7a5 \ud568\uc218\ub294 \uc778\uc790 \ubaa8\ub450\ub97c \ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c \ud3c9\uac00\ud55c\ub2e4. \uc2e4\uc81c\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">print<\/code>\ub294 \uc81c\ud55c\uc5c6\ub294 \uc218\uc758 \uc778\uc790 \ub9ac\uc2a4\ud2b8\ub97c \ubc1b\uc544 \uac01\uac01 \ucc28\ub840\ub85c \ucd9c\ub825\ud55c\ub2e4. \uadf8\ub798\uc11c \ubc30\uc5f4\ub3c4 \uc9c1\uc811 \ucd9c\ub825\ud558\ub294\ub370 \uc774\uc6a9\ud560 \uc218 \uc788\ub294 \uac83\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array = (\"Alpha\", \"Beta\", \"Goo\");\nmy $scalar = \"-X-\";\nprint @array; # \"AlphaBetaGoo\"\nprint $scalar, @array, 98; # \"-X-AlphaBetaGoo98\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/scalar.html\">scalar<\/a>&nbsp;\ub0b4\uc7a5 \ud568\uc218\ub97c \uc774\uc6a9\ud558\uba74 \uc5b4\ub5a0\ud55c \ud45c\ud604\uc2dd\uc774\ub77c\ub3c4 \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c \ud3c9\uac00\ub418\uac8c \ud560 \uc218 \uc788\ub2e4. \ubc30\uc5f4\uc758 \uae38\uc774\ub97c \uad6c\ud560 \ub54c&nbsp;<code style=\"color: rgb(52, 130, 117);\">scalar<\/code>&nbsp;\ud568\uc218\ub97c \uc4f0\ub294 \uac83\uc740 \uc774\ub97c \uc774\uc6a9\ud55c \uacb0\uacfc\uc774\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc11c\ube0c\ub8e8\ud2f4\uc774 \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c \uc2e4\ud589\ub418\uba74 \uc2a4\uce7c\ub77c \uac12\uc744 \ubc18\ud658\ud558\uace0 \ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c \uc2e4\ud589\ub418\uba74 \ub9ac\uc2a4\ud2b8 \uac12\uc744 \ubc18\ud658\ud558\ub3c4\ub85d \uc791\uc131\ud558\ub294\ub370 \uc5bd\ub9e4\uc77c \ud544\uc694\ub294 \uc5c6\ub2e4. \uc704\uc5d0\uc11c \ubcf4\uc558\ub4ef\uc774 \ud384\uc774 \uc801\uc808\ud558\uac8c \uac12\uc744 \ucc98\ub9ac\ud574\uc900\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\ucc38\uc870(reference)\uc640 \uc911\ucca9\ub41c \uc790\ub8cc\uad6c\uc870<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ub9ac\uc2a4\ud2b8\uac00 \ub9ac\uc2a4\ud2b8\ub97c \uc6d0\uc18c\ub85c \ud3ec\ud568\ud560 \uc218 \uc5c6\ub4ef\uc774&nbsp;<strong>\ubc30\uc5f4\uacfc \ud574\uc2dc\ub294 \ub2e4\ub978 \ubc30\uc5f4\uacfc \ud574\uc2dc\ub97c \uc6d0\uc18c\ub85c \ud3ec\ud568\ud560 \uc218 \uc5c6\ub2e4<\/strong>. \uc624\ub85c\uc9c0 \uc2a4\uce7c\ub77c\ub9cc\uc744 \ud3ec\ud568\ud560 \uc218 \uc788\ub2e4. \ub2e4\uc74c\uc744 \uc2dc\ub3c4\ud574 \ubcf4\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @outer = (\"Sun\", \"Mercury\", \"Venus\", undef, \"Mars\");\nmy @inner = (\"Earth\", \"Moon\");\n\n$outer[3] = @inner;\n\nprint $outer[3]; # \"2\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">$outer[3]<\/code>\uc740 \uc2a4\uce7c\ub77c\uc774\uae30 \ub54c\ubb38\uc5d0 \uc2a4\uce7c\ub77c \uac12\uc774 \ud544\uc694\ud558\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">@inner<\/code>\uc640 \uac19\uc740 \ubc30\uc5f4\uac12\uc744 \ub300\uc785\ud558\ub824\uace0 \ud558\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">@inner<\/code>\ub294 \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c \ud3c9\uac00\ub41c\ub2e4. \uc774\uac74&nbsp;<code style=\"color: rgb(52, 130, 117);\">scalar @inner<\/code>, \uc989&nbsp;<code style=\"color: rgb(52, 130, 117);\">@inner<\/code>&nbsp;\ubc30\uc5f4\uc758 \uae38\uc774\ub97c \ub300\uc785\ud558\ub294 \uac83\uacfc \ub9c8\ucc2c\uac00\uc9c0\uac00 \ub418\uc5b4 2\uac00 \ub300\uc785\ub41c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud558\uc9c0\ub9cc \uc2a4\uce7c\ub77c \ubcc0\uc218\ub294 \ubc30\uc5f4\uacfc \ud574\uc2dc\ub97c \ud3ec\ud568\ud558\uc5ec \ub2e4\ub978 \ubcc0\uc218\uc758&nbsp;<em>\ucc38\uc870(reference)<\/em>\ub97c \uc800\uc7a5\ud560 \uc218\ub3c4 \uc788\ub2e4. \uc774\ub97c \uc774\uc6a9\ud558\uc5ec \ud384\uc5d0\uc11c \ubcf5\uc7a1\ud55c \uc790\ub8cc\uad6c\uc870\ub97c \ub9cc\ub4e4\uc5b4 \ub0bc \uc218 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ucc38\uc870\ub294 \uc5ed\uc2ac\ub798\uc2dc\ub97c \uc774\uc6a9\ud558\uc5ec \uc0dd\uc131\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $colour = \"Indigo\";\nmy $scalarRef = \\$colour;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ucc38\uc870 \ubcc0\uc218\ub294 \ucc38\uc870 \ubcc0\uc218\uac00 \ucc38\uc870\ud558\ub294 \ubcc0\uc218\ub97c \uc6d0\ub798 \uc0ac\uc6a9\ud558\ub294 \uc2dd\uc5d0\uc11c \ubcc0\uc218\uc758 \uc774\ub984\uc774 \uc788\ub294 \ubd80\ubd84\uc744 \uc911\uad04\ud638\ub85c \uac10\uc2f8\uace0 \uc774\ub984\uc774 \uc788\ub294 \ubd80\ubd84\uc744 \uadf8 \ucc38\uc870 \ubcc0\uc218\ub85c \ubc14\uafb8\ub294 \ud615\ud0dc\ub85c \uc0ac\uc6a9\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $colour; # \"Indigo\"\nprint $scalarRef; # e.g. \"SCALAR(0x182c180)\"\nprint ${ $scalarRef }; # \"Indigo\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubaa8\ud638\ud55c \uc810\uc774 \uc5c6\uc774 \uacb0\uacfc\uac00 \uba85\ud655\ud558\ub2e4\uba74 \uc911\uad04\ud638\ub97c \uc0dd\ub7b5\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $$scalarRef; # \"Indigo\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc774\ub098 \ud574\uc2dc\uc5d0 \ub300\ud55c \ucc38\uc870\ub77c\uba74 \uc911\uad04\ud638\ub97c \uc774\uc6a9\ud558\uac70\ub098, \ub610\ub294 \uc880\ub354 \ub9ce\uc774 \uc4f0\ub294 \ud615\ud0dc\uc778 \ud654\uc0b4\ud45c \uc5f0\uc0b0\uc790&nbsp;<code style=\"color: rgb(52, 130, 117);\">-&gt;<\/code>\ub97c \uc774\uc6a9\ud558\uc5ec \uac12\uc744 \uc5bb\uc62c \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @colours = (\"Red\", \"Orange\", \"Yellow\", \"Green\", \"Blue\");\nmy $arrayRef = \\@colours;\n\nprint $colours[0]; # \ubc30\uc5f4 \uc9c1\uc811 \uc811\uadfc\nprint ${ $arrayRef }[0]; # \ucc38\uc870\ub97c \uc774\uc6a9\ud558\uc5ec \ubc30\uc5f4\uc5d0 \uc811\uadfc\nprint $arrayRef-&gt;[0]; # \uc704\uc640 \ub611\uac19\uc74c\n\nmy %atomicWeights = (\"Hydrogen\" =&gt; 1.008, \"Helium\" =&gt; 4.003, \"Manganese\" =&gt; 54.94);\nmy $hashRef = \\%atomicWeights;\n\nprint $atomicWeights{\"Helium\"}; # \ud574\uc2dc \uc9c1\uc811 \uc811\uadfc\nprint ${ $hashRef }{\"Helium\"}; # \ucc38\uc870\ub97c \uc774\uc6a9\ud558\uc5ec \ud574\uc2dc\uc5d0 \uc811\uadfc\nprint $hashRef-&gt;{\"Helium\"}; # \uc704\uc640 \ub611\uac19\uc74c. \ub9ce\uc774 \uc0ac\uc6a9\ub418\ub294 \ud615\ud0dc\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\uc790\ub8cc\uad6c\uc870 \uc120\uc5b8<\/h3><p style=\"font-family: Gulim; font-size: small;\">\ub124 \uac00\uc9c0 \uc608\ub97c \ub4e4\uc5b4\ubcf4\uaca0\ub2e4. \ud558\uc9c0\ub9cc \uc2e4\uc81c\ub85c\ub294 \ub9c8\uc9c0\ub9c9 \uac83\uc774 \uac00\uc7a5 \uc720\uc6a9\ud558\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my %owner1 = (\n    \"name\" =&gt; \"Santa Claus\",\n    \"DOB\" =&gt; \"1882-12-25\",\n);\n\nmy $owner1Ref = \\%owner1;\n\nmy %owner2 = (\n    \"name\" =&gt; \"Mickey Mouse\",\n    \"DOB\" =&gt; \"1928-11-18\",\n);\n\nmy $owner2Ref = \\%owner2;\n\nmy @owners = ( $owner1Ref, $owner2Ref );\n\nmy $ownersRef = \\@owners;\n\nmy %account = (\n    \"number\" =&gt; \"12345678\",\n    \"opened\" =&gt; \"2000-01-01\",\n    \"owners\" =&gt; $ownersRef,\n);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc704\uc758 \uac83\uc740 \ub108\ubb34 \ub178\uac00\ub2e4\uac00 \uc2ec\ud558\ub2e4. \ub2e4\uc74c\uacfc \uac19\uc774 \uc904\uc5ec\ubcf4\uc790:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my %owner1 = (\n    \"name\" =&gt; \"Santa Claus\",\n    \"DOB\" =&gt; \"1882-12-25\",\n);\n\nmy %owner2 = (\n    \"name\" =&gt; \"Mickey Mouse\",\n    \"DOB\" =&gt; \"1928-11-18\",\n);\n\nmy @owners = ( \\%owner1, \\%owner2 );\n\nmy %account = (\n    \"number\" =&gt; \"12345678\",\n    \"opened\" =&gt; \"2000-01-01\",\n    \"owners\" =&gt; \\@owners,\n);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub2e4\ub978 \uae30\ud638\ub97c \uc0ac\uc6a9\ud558\uc5ec&nbsp;<em>\uc775\uba85<\/em>&nbsp;\ubc30\uc5f4\uacfc \ud574\uc2dc\ub97c \uc120\uc5b8\ud560 \uc218 \uc788\ub2e4. \ub300\uad04\ud638\ub97c \uc0ac\uc6a9\ud558\uc5ec \uc775\uba85 \ubc30\uc5f4\uc744, \uadf8\ub9ac\uace0 \uc911\uad04\ud638\ub97c \uc0ac\uc6a9\ud558\uc5ec \uc775\uba85 \ud574\uc2dc\ub97c \uc120\uc5b8\ud55c\ub2e4. \ubc18\ud658\ud558\ub294 \uac12\uc740 \uac01\uac01\uc758 \uc775\uba85 \uc790\ub8cc\uad6c\uc870\uc758 \ucc38\uc870\uc774\ub2e4. \uc790 \ub2e4\uc74c\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">%accounts<\/code>\uc640 \uc644\uc804\ud788 \ub611\uac19\uc740 \uacb0\uacfc\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\"># \uc911\uad04\ud638\ub294 \uc775\uba85 \ud574\uc2dc\nmy $owner1Ref = {\n    \"name\" =&gt; \"Santa Claus\",\n    \"DOB\" =&gt; \"1882-12-25\",\n};\n\nmy $owner2Ref = {\n    \"name\" =&gt; \"Mickey Mouse\",\n    \"DOB\" =&gt; \"1928-11-18\",\n};\n\n# \ub300\uad04\ud638\ub294 \uc775\uba85 \ubc30\uc5f4\nmy $ownersRef = [ $owner1Ref, $owner2Ref ];\n\nmy %account = (\n    \"number\" =&gt; \"12345678\",\n    \"opened\" =&gt; \"2000-01-01\",\n    \"owners\" =&gt; $ownersRef,\n);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub354 \uc904\uc5ec\ubcf4\uc790(\uadf8\ub9ac\uace0 \uc774 \ubc29\uc2dd\uc774 \ubcf5\uc7a1\ud55c \uc790\ub8cc\uad6c\uc870\ub97c \ud55c\ubc88\uc5d0 \uc120\uc5b8\ud560 \ub54c \uc2e4\uc81c\ub85c \uc0ac\uc6a9\ud558\ub294 \ubc29\uc2dd\uc774\ub2e4):<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my %account = (\n    \"number\" =&gt; \"31415926\",\n    \"opened\" =&gt; \"3000-01-01\",\n    \"owners\" =&gt; [\n        {\n            \"name\" =&gt; \"Philip Fry\",\n            \"DOB\" =&gt; \"1974-08-06\",\n        },\n        {\n            \"name\" =&gt; \"Hubert Farnsworth\",\n            \"DOB\" =&gt; \"2841-04-09\",\n        },\n    ],\n);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\uc790\ub8cc\uad6c\uc870\uc5d0\uc11c \uac12\uc744 \uc5bb\ub294 \ubc95<\/h3><p style=\"font-family: Gulim; font-size: small;\">\uc704\uc758 \uc608\uc5d0\uc11c \uc544\uc9c1&nbsp;<code style=\"color: rgb(52, 130, 117);\">%account<\/code>&nbsp;\ubcc0\uc218\ub294 \uc720\ud6a8\ud558\uace0 \ub098\uba38\uc9c0 \ubcc0\uc218\ub4e4\uc740 \ubb34\ud6a8\ud654\ub418\uc5b4 \uc5c6\uc5b4\uc84c\ub2e4\uace0 \ud574\ubcf4\uc790. \uc55e\uc11c\uc758 \uac01\uac01\uc758 \uacbd\uc6b0\ub97c \ubc18\ub300\ub85c \ub418\uc9da\uc5b4\uac00\uba74 \uc815\ubcf4\ub97c \ucd9c\ub825\ud560 \uc218 \uc788\ub2e4. \ub9c8\ucc2c\uac00\uc9c0\ub85c \ub124 \uac00\uc9c0 \uc608\ub97c \ubcf4\uc774\uaca0\ub294\ub370, \uc5ed\uc2dc \ub9c8\uc9c0\ub9c9 \uacbd\uc6b0\uac00 \uac00\uc7a5 \uc720\uc6a9\ud558\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $ownersRef = $account{\"owners\"};\nmy @owners    = @{ $ownersRef };\nmy $owner1Ref = $owners[0];\nmy %owner1    = %{ $owner1Ref };\nmy $owner2Ref = $owners[1];\nmy %owner2    = %{ $owner2Ref };\nprint \"Account #\", $account{\"number\"}, \"\\n\";\nprint \"Opened on \", $account{\"opened\"}, \"\\n\";\nprint \"Joint owners:\\n\";\nprint \"\\t\", $owner1{\"name\"}, \" (born \", $owner1{\"DOB\"}, \")\\n\";\nprint \"\\t\", $owner2{\"name\"}, \" (born \", $owner2{\"DOB\"}, \")\\n\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc904\uc5ec\ubcf4\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @owners = @{ $account{\"owners\"} };\nmy %owner1 = %{ $owners[0] };\nmy %owner2 = %{ $owners[1] };\nprint \"Account #\", $account{\"number\"}, \"\\n\";\nprint \"Opened on \", $account{\"opened\"}, \"\\n\";\nprint \"Joint owners:\\n\";\nprint \"\\t\", $owner1{\"name\"}, \" (born \", $owner1{\"DOB\"}, \")\\n\";\nprint \"\\t\", $owner2{\"name\"}, \" (born \", $owner2{\"DOB\"}, \")\\n\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ucc38\uc870\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">-&gt;<\/code>&nbsp;\uc5f0\uc0b0\uc790\ub97c \uc0ac\uc6a9\ud558\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $ownersRef = $account{\"owners\"};\nmy $owner1Ref = $ownersRef-&gt;[0];\nmy $owner2Ref = $ownersRef-&gt;[1];\nprint \"Account #\", $account{\"number\"}, \"\\n\";\nprint \"Opened on \", $account{\"opened\"}, \"\\n\";\nprint \"Joint owners:\\n\";\nprint \"\\t\", $owner1Ref-&gt;{\"name\"}, \" (born \", $owner1Ref-&gt;{\"DOB\"}, \")\\n\";\nprint \"\\t\", $owner2Ref-&gt;{\"name\"}, \" (born \", $owner2Ref-&gt;{\"DOB\"}, \")\\n\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub9ac\uace0 \uc911\uac04\uc5d0 \uac70\uce58\ub294 \ub2e8\uacc4\ub97c \ubaa8\ub450 \uc0dd\ub7b5\ud558\uba74<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"Account #\", $account{\"number\"}, \"\\n\";\nprint \"Opened on \", $account{\"opened\"}, \"\\n\";\nprint \"Joint owners:\\n\";\nprint \"\\t\", $account{\"owners\"}-&gt;[0]-&gt;{\"name\"}, \" (born \", $account{\"owners\"}-&gt;[0]-&gt;{\"DOB\"}, \")\\n\";\nprint \"\\t\", $account{\"owners\"}-&gt;[1]-&gt;{\"name\"}, \" (born \", $account{\"owners\"}-&gt;[1]-&gt;{\"DOB\"}, \")\\n\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\ubc30\uc5f4\uc758 \ucc38\uc870\ub294 \uc798\ubabb \uc0ac\uc6a9\ud558\uba74 \ub0ad\ud328\ub97c \ubcfc \uc218 \uc788\ub2e4.<\/h3><p style=\"font-family: Gulim; font-size: small;\">\ub2e4\uc74c \ubc30\uc5f4\uc740 \ub2e4\uc12f\uac1c\uc758 \uc6d0\uc18c\ub97c \uac00\uc9c4\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array1 = (1, 2, 3, 4, 5);\nprint @array1; # \"12345\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub7ec\ub098 \ub2e4\uc74c \ubc30\uc5f4\uc740 \uc624\uc9c1&nbsp;<em>\ud558\ub098\uc758 \uc6d0\uc18c<\/em>\ub9cc \uac00\uc9c4\ub2e4. \ub2e4\uc12f\uac1c\uc758 \uc6d0\uc18c\ub97c \uac00\uc9c4 \uc775\uba85 \ubc30\uc5f4\uc758 \ucc38\uc870\uac00 \uadf8 \uc6d0\uc18c\uc774\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @array2 = [1, 2, 3, 4, 5];\nprint @array2; # e.g. \"ARRAY(0x182c180)\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub2e4\uc74c \uc2a4\uce7c\ub77c \ubcc0\uc218\ub294 \ub2e4\uc12f\uac1c\uc758 \uc6d0\uc18c\ub97c \uac00\uc9c4 \uc775\uba85 \ubc30\uc5f4\uc758 \ucc38\uc870\uc774\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $array3Ref = [1, 2, 3, 4, 5];\nprint $array3Ref;      # e.g. \"ARRAY(0x22710c0)\"\nprint @{ $array3Ref }; # \"12345\"\nprint @$array3Ref;     # \"12345\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h2 style=\"font-family: Gulim;\">\uc870\uac74\ubb38<\/h2><h3 style=\"font-family: Gulim;\"><code style=\"color: rgb(52, 130, 117);\">if<\/code>&nbsp;...&nbsp;<code style=\"color: rgb(52, 130, 117);\">elsif<\/code>&nbsp;...&nbsp;<code style=\"color: rgb(52, 130, 117);\">else<\/code>&nbsp;...<\/h3><p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">elsif<\/code>\uc758 \ucca0\uc790\uac00 \ud2b9\ubcc4\ud55c \uac70 \uc678\uc5d4 \ubcc4\ub2e4\ub97c \uac70 \uc5c6\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $word = \"antidisestablishmentarianism\";\nmy $strlen = [length](http:\/\/perldoc.perl.org\/functions\/length.html) $word;\n\nif($strlen &gt;= 15) {\n    print \"'\", $word, \"' is a very long word\";\n} elsif(10 &lt;= $strlen &amp;&amp; $strlen &lt; 15) {\n    print \"'\", $word, \"' is a medium-length word\";\n} else {\n    print \"'\", $word, \"' is a a short word\";\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uba85\ub839\ubb38\uc744 \uc9e7\uac8c \uc4f8 \ub54c \ub9ce\uc774 \uc4f0\ub294 \"\uba85\ub839\ubb38&nbsp;<code style=\"color: rgb(52, 130, 117);\">if<\/code>&nbsp;\uc870\uac74\" \ud615\uc2dd\ub3c4 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"'\", $word, \"' is actually enormous\" if $strlen &gt;= 20;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\"><code style=\"color: rgb(52, 130, 117);\">unless<\/code>&nbsp;...&nbsp;<code style=\"color: rgb(52, 130, 117);\">else<\/code>&nbsp;...<\/h3><pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $temperature = 20;\n\nunless($temperature &gt; 30) {\n    print $temperature, \" degrees Celsius is not very hot\";\n} else {\n    print $temperature, \" degrees Celsius is actually pretty hot\";\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">unless<\/code>&nbsp;\ubb38\uc744 \uc4f0\uba74 \ud5f7\uac08\ub824\uc9c0\uae30 \uc27d\uae30 \ub54c\ubb38\uc5d0 \ub300\uccb4\ub85c \uc0ac\uc6a9\ud558\uc9c0 \uc54a\ub294 \uac8c \ub0ab\ub2e4. \"<code style=\"color: rgb(52, 130, 117);\">unless<\/code>&nbsp;[...&nbsp;<code style=\"color: rgb(52, 130, 117);\">else<\/code>]\" \ubb38\uc740 \uc870\uac74\uc808\uc744 \ubc18\ub300\ub85c \ud558\uac70\ub098 \ube14\ub7ed\uc744 \ub4a4\ubc14\uafb8\ub294 \uc2dd\uc73c\ub85c \uac04\ub2e8\ud558\uac8c \"<code style=\"color: rgb(52, 130, 117);\">if<\/code>&nbsp;[...&nbsp;<code style=\"color: rgb(52, 130, 117);\">else<\/code>]\" \ubb38\uc73c\ub85c \ubc14\uafc0 \uc218 \uc788\ub2e4. \ub2e4\ud589\ud788\ub3c4&nbsp;<code style=\"color: rgb(52, 130, 117);\">elsunless<\/code>\uc640 \uac19\uc740 \uc608\uc57d\uc5b4(keyword)\ub294 \uc5c6\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub7ec\ub098 \ub2e4\uc74c\uacfc \uac19\uc774 \uc77d\uae30 \uc27d\uac8c \uc4f8 \uc218 \uc788\ub294 \uacbd\uc6b0\uc5d0\ub294 \uc0ac\uc6a9\ud574\ub3c4 \uc88b\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"Oh no it's too cold\" unless $temperature &gt; 15;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\uc0bc\ud56d \uc5f0\uc0b0\uc790<\/h3><p style=\"font-family: Gulim; font-size: small;\">\uc0bc\ud56d \uc5f0\uc0b0\uc790&nbsp;<code style=\"color: rgb(52, 130, 117);\">? :<\/code>\ub97c \uc0ac\uc6a9\ud574\uc11c \uac04\ub2e8\ud55c&nbsp;<code style=\"color: rgb(52, 130, 117);\">if<\/code>\ubb38\uc744 \ud55c \ubb38\uc7a5\uc73c\ub85c \uc555\ucd95\ud560 \uc218 \uc788\ub2e4. \uace0\uc804\uc801\uc778 \uc0ac\uc6a9\uc608\ub294 \ub2e4\uc74c\uacfc \uac19\uc774 \ub2e8\/\ubcf5\uc218\ud615\uc744 \uad6c\ubd84\ud558\uc5ec \ucd9c\ub825\ud558\ub294 \ucf54\ub4dc\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $gain = 48;\nprint \"You gained \", $gain, \" \", ($gain == 1 ? \"experience point\" : \"experience points\"), \"!\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc7a0\uae50 \uc606\uae38\ub85c \uc0c8\uba74, \uc704\uc640 \uac19\uc774 \ub2e8\/\ubcf5\uc218\ud615\uc744 \uad6c\ubd84\ud558\uc5ec \ucd9c\ub825\ud558\uace0\uc790 \ud560 \ub54c\ub294 \uc544\ub798\uc758 \uc608\ucc98\ub7fc \uad50\ubb18\ud558\uac8c \uad6c\ud604\ud558\ub294 \uac74 \ubcc4\ub85c \uc88b\uc9c0 \uc54a\ub2e4. \uac00\ub2a5\ud558\uba74 \ub2e8\/\ubcf5\uc218\ud615 \ub2e8\uc5b4\ub97c \uc628\uc804\ud788 \uc774\uc6a9\ud558\ub294 \uac8c \uc88b\ub2e4. \ub9cc\uc57d \uc774 \ucf54\ub4dc\uc5d0\uc11c \"tooth\"\uc640 \"teeth\"\ub97c \ub2e4\ub978 \ub2e8\uc5b4\ub85c \ubc14\uafd4\uc57c \ud55c\ub2e4\uba74 \uac80\uc0c9\uc73c\ub85c \ucc3e\uae30\ub294 \uc27d\uc9c0 \uc54a\uc744 \uac83\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $lost = 1;\nprint \"You lost \", $lost, \" t\", ($lost == 1 ? \"oo\" : \"ee\"), \"th!\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc0bc\ud56d \uc5f0\uc0b0\uc790\ub294 \uc911\ucca9\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $eggs = 5;\nprint \"You have \", $eggs == 0 ? \"no eggs\" :\n                   $eggs == 1 ? \"an egg\"  :\n                   \"some eggs\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">if<\/code>&nbsp;\ubb38\uc740 \uc870\uac74\ubb38\uc744 \uc2a4\uce7c\ub77c \ub9e5\ub77d\uc5d0\uc11c \ud3c9\uac00\ud55c\ub2e4. \uc608\ub97c \ub4e4\uc5b4&nbsp;<code style=\"color: rgb(52, 130, 117);\">if (@array)<\/code>&nbsp;\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">@array<\/code>&nbsp;\ubcc0\uc218\uac00 1\uac1c \uc774\uc0c1\uc758 \uc6d0\uc18c\ub97c \uac00\uc9c8 \ub54c \ucc38\uc774 \ub41c\ub2e4. \uc6d0\uc18c\uac00 \ubb34\uc5c7\uc774\ub4e0 - \uc2ec\uc9c0\uc5b4&nbsp;<code style=\"color: rgb(52, 130, 117);\">undef<\/code>\ub098 false\uac00 \ub418\ub294 \ub2e4\ub978 \ubaa8\ub4e0 \uac12\uc774\ub77c\ub3c4 - \uc0c1\uad00\ud558\uc9c0 \uc54a\ub294\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\ubc18\ubcf5\ubb38<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ubc18\ubcf5\uc744 \ud558\ub294 \ub370\uc5d0\ub3c4 \ud55c\uac00\uc9c0 \uc774\uc0c1\uc758 \ubc29\ubc95\uc774 \uc788\ub2e4(There's More Than One Way To Do It)<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud1b5\uc0c1\uc801\uc778&nbsp;<code style=\"color: rgb(52, 130, 117);\">while<\/code>&nbsp;\ubc18\ubcf5\ubb38\uc774 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $i = 0;\nwhile($i &lt; scalar @array) {\n    print $i, \": \", $array[$i];\n    $i++;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">until<\/code>&nbsp;\uc608\uc57d\uc5b4\ub3c4 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $i = 0;\nuntil($i &gt;= scalar @array) {\n    print $i, \": \", $array[$i];\n    $i++;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">do<\/code>\ub97c \uc774\uc6a9\ud55c \ubc18\ubcf5\ubb38\uc740 \uc704\uc758 \uacbd\uc6b0\uc640 \uac70\uc758 \uac19\ub2e4(<code style=\"color: rgb(52, 130, 117);\">@array<\/code>&nbsp;\ubcc0\uc218\uac00 \ube48 \ubc30\uc5f4\uc774\ub77c\uba74 \uacbd\uace0\uac00 \ubc1c\uc0dd\ud55c\ub2e4):<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $i = 0;\ndo {\n    print $i, \": \", $array[$i];\n    $i++;\n} while ($i &lt; scalar @array);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub9ac\uace0<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $i = 0;\ndo {\n    print $i, \": \", $array[$i];\n    $i++;\n} until ($i &gt;= scalar @array);\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">C\uc5b8\uc5b4 \uc2a4\ud0c0\uc77c\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">for<\/code>&nbsp;\ubc18\ubcf5\ubb38\ub3c4 \uac00\ub2a5\ud558\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">my<\/code>\ub97c&nbsp;<code style=\"color: rgb(52, 130, 117);\">for<\/code>&nbsp;\ubb38 \uc548\uc5d0 \ub450\uc5b4&nbsp;<code style=\"color: rgb(52, 130, 117);\">$i<\/code>&nbsp;\ubcc0\uc218\uc758 \ubc94\uc704\ub97c \ubc18\ubcf5\ubb38 \uc548\uc73c\ub85c\ub9cc \uc81c\ud55c\ud55c \uc810\ub3c4 \ub208\uc5ec\uaca8 \ubcfc \ud544\uc694\uac00 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">for(my $i = 0; $i &lt; scalar @array; $i++) {\n    print $i, \": \", $array[$i];\n}\n# $i \ubcc0\uc218\ub294 \uc5ec\uae30\uc11c \ub354\uc774\uc0c1 \uc874\uc7ac\ud558\uc9c0 \uc54a\ub294\ub2e4.\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc704\uc640 \uac19\uc740 \uc885\ub958\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">for<\/code>&nbsp;\ubb38\uc740 \uad6c\ub2e5\ub2e4\ub9ac \uc2a4\ud0c0\uc77c\ub85c \uc5ec\uaca8\uc838\uc11c \uac00\ub2a5\ud558\uba74 \uc0ac\uc6a9\ud558\uc9c0 \uc54a\ub294 \uac8c \uc88b\ub2e4. \uac04\ub2e8\ud55c \ub9ac\uc2a4\ud2b8 \uc21c\ud68c\ub294 \ud6e8\uc52c \uba4b\uc9c0\uac8c \ud560 \uc218 \uc788\ub2e4. PHP\uc640\ub294 \ub2e4\ub974\uac8c&nbsp;<code style=\"color: rgb(52, 130, 117);\">for<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">foreach<\/code>&nbsp;\uc608\uc57d\uc5b4\ub294 \ub3d9\uc758\uc5b4\uc774\ub2e4. \uc880\ub354 \uac00\ub3c5\uc131\uc774 \uc88b\uc740 \uac83\uc73c\ub85c \ub458 \uc911 \uc544\ubb34\uac70\ub098 \uc0ac\uc6a9\ud558\uba74 \ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">foreach my $string ( @array ) {\n    print $string;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc758 \uc778\ub371\uc2a4\uac00 \ud544\uc694\ud558\uba74&nbsp;<a href=\"http:\/\/perldoc.perl.org\/perlop.html#Range-Operators\">\ubc94\uc704 \uc5f0\uc0b0\uc790<\/a>&nbsp;<code style=\"color: rgb(52, 130, 117);\">..<\/code>\ub97c \uc0ac\uc6a9\ud558\uc5ec \uc775\uba85 \uc815\uc218 \ub9ac\uc2a4\ud2b8\ub97c \uc0dd\uc131\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">foreach my $i ( 0 .. $#array ) {\n    print $i, \": \", $array[$i];\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud574\uc2dc\ub97c \uc21c\ud68c\ud560 \uc218\ub294 \uc5c6\uc9c0\ub9cc \ud574\uc2dc \ud0a4\ub97c \uc21c\ud68c\ud560 \uc218\ub294 \uc788\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">keys<\/code>\ub77c\ub294 \ub0b4\uc7a5 \ud568\uc218\ub97c \uc4f0\uba74 \ud574\uc2dc\uc758 \ubaa8\ub4e0 \ud0a4\ub97c \uc6d0\uc18c\ub85c \ud558\ub294 \ubc30\uc5f4\uc744 \uc5bb\uc744 \uc218 \uc788\ub2e4. \uc5ec\uae30\uc5d0 \ubc30\uc5f4\uc5d0\uc11c\uc640 \uac19\uc774&nbsp;<code style=\"color: rgb(52, 130, 117);\">foreach<\/code>&nbsp;\ub97c \uc4f0\uba74 \ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">foreach my $key (keys %scientists) {\n    print $key, \": \", $scientists{$key};\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud574\uc2dc\ub294 \ub0b4\ubd80\uc5d0 \uc5b4\ub5a4 \uc21c\uc11c\ub3c4 \uc5c6\uc73c\ubbc0\ub85c \ud0a4\ub3c4 \uc784\uc758\uc758 \uc21c\uc11c\ub85c \ub098\uc5f4\ub41c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">sort<\/code>\ub77c\ub294 \ub0b4\uc7a5 \ud568\uc218\ub97c \uc4f0\uba74 \uba3c\uc800 \ud0a4 \ubc30\uc5f4\uc744 \uc54c\ud30c\ubcb3 \uc21c\uc11c\ub85c \uc815\ub82c\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">foreach my $key (sort keys %scientists) {\n    print $key, \": \", $scientists{$key};\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc18\ubcf5\uc790(iterator)\ub97c \uc9c0\uc815\ud558\uc9c0 \uc54a\uc73c\uba74 \ud384\uc740 \uae30\ubcf8 \ubc18\ubcf5\uc790&nbsp;<code style=\"color: rgb(52, 130, 117);\">$_<\/code>\ub97c \uc0ac\uc6a9\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">$_<\/code>\ub294 \uccab\ubc88\uc9f8\ub85c \ub098\uc624\ub294&nbsp;<a href=\"http:\/\/perldoc.perl.org\/perlvar.html\">\ub0b4\uc7a5 \ubcc0\uc218<\/a>\ub85c \ub0b4\uc7a5 \ubcc0\uc218 \uc911 \uac00\uc7a5 \ud754\ud558\uac8c \ub9c8\uc8fc\uce58\uac8c \ub420 \uac83\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">foreach ( @array ) {\n    print $_;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc18\ubcf5\ubb38\uc5d0 \uba85\ub839\uc5b4\uac00 \ud558\ub098\ub9cc \uc788\ub294 \uacbd\uc6b0 \uae30\ubcf8 \ubc18\ubcf5\uc790\ub97c \uc798 \uc774\uc6a9\ud558\uc5ec \uc544\uc8fc \uc9e7\uac8c \ubc18\ubcf5\ubb38\uc744 \ub9cc\ub4e4 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $_ foreach @array;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\ubc18\ubcf5\ubb38 \uc81c\uc5b4<\/h3><p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">next<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">last<\/code>\ub97c \uc0ac\uc6a9\ud558\uc5ec \ubc18\ubcf5\ubb38\uc758 \uc9c4\ud589\uc744 \uc81c\uc5b4\ud560 \uc218 \uc788\ub2e4. \ub2e4\ub978 \ub9ce\uc740 \uc5b8\uc5b4\uc5d0\uc11c \uac01\uac01&nbsp;<code style=\"color: rgb(52, 130, 117);\">continue<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">break<\/code>\uc5d0 \ud574\ub2f9\ud558\ub294 \uac83\uc774\ub2e4. \ub610 \ubd80\uac00\uc801\uc73c\ub85c \uc774\ub984\ud45c(label)\ub97c \ubc18\ubcf5\ubb38\uc5d0 \ubd99\uc77c \uc218 \uc788\ub2e4. \uc774\ub984\ud45c\ub294 \ubaa8\ub450 \ub300\ubb38\uc790\ub85c \uc4f0\ub294 \uac83\uc774 \uad00\ub840\uc774\ub2e4. \ubc18\ubcf5\ubb38\uc5d0 \uc774\ub984\ud45c\ub97c \ubd99\uc5ec\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">next<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">last<\/code>\uc5d0 \ub530\ub978 \uc9c4\ud589\uc744 \uc774\ub984\ud45c\ub85c \ud5a5\ud558\uac8c \ud560 \uc218 \uc788\ub2e4. \ub2e4\uc74c \uc608\ub294 100 \ubbf8\ub9cc\uc758 \uc18c\uc218\ub97c \ucc3e\ub294 \uc608\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">CANDIDATE: for my $candidate ( 2 .. 100 ) {\n    for my $divisor ( 2 .. <a href=\"http:\/\/perldoc.perl.org\/functions\/sqrt.html\">sqrt<\/a> $candidate ) {\n        next CANDIDATE if $candidate % $divisor == 0;\n    }\n    print $candidate.\" is prime\\n\";\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h2 style=\"font-family: Gulim;\">\ubc30\uc5f4 \ud568\uc218<\/h2><h3 style=\"font-family: Gulim;\">\ubc30\uc5f4 \uc790\uccb4 \ubcc0\uacbd<\/h3><p style=\"font-family: Gulim; font-size: small;\">\uc774\uc81c\ubd80\ud130&nbsp;<code style=\"color: rgb(52, 130, 117);\">@stack<\/code>\uc774\ub77c\ub294 \ubcc0\uc218\ub97c \uc0ac\uc6a9\ud558\uc5ec \uc6a9\ub840\ub97c \ubcf4\uc774\uaca0\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @stack = (\"Fred\", \"Eileen\", \"Denise\", \"Charlie\");\nprint @stack; # \"FredEileenDeniseCharlie\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/pop.html\">pop<\/a>\uc740 \ubc30\uc5f4\uc5d0\uc11c \ub9c8\uc9c0\ub9c9 \uc6d0\uc18c\ub97c \uc81c\uac70\ud558\uace0 \uc774\ub97c \ubc18\ud658\ud55c\ub2e4. \ubc30\uc5f4\uc758 \ub9c8\uc9c0\ub9c9\uc740 \uc2a4\ud0dd(\u115fstack)\uc758 \ub9e8 \uc704\ub85c \ubcf4\uba74 \ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print pop @stack; # \"Charlie\"\nprint @stack; # \"FredEileenDenise\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/push.html\">push<\/a>\ub294 \ubc30\uc5f4\uc758 \ub9c8\uc9c0\ub9c9\uc5d0 \uc0c8\ub85c \uc6d0\uc18c\ub97c \ucd94\uac00\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">push @stack, \"Bob\", \"Alice\";\nprint @stack; # \"FredEileenDeniseBobAlice\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/shift.html\">shift<\/a>\ub294 \ubc30\uc5f4\uc5d0\uc11c \uccab\ubc88\uc9f8 \uc6d0\uc18c\ub97c \uc81c\uac70\ud558\uace0 \uc774\ub97c \ubc18\ud658\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print shift @stack; # \"Fred\"\nprint @stack; # \"EileenDeniseBobAlice\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/unshift.html\">unshift<\/a>\ub294 \ubc30\uc5f4\uc758 \ub9e8 \uc55e\uc5d0 \uc0c8 \uc6d0\uc18c\ub97c \ucd94\uac00\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">unshift @stack, \"Hank\", \"Grace\";\nprint @stack; # \"HankGraceEileenDeniseBobAlice\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">pop<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">push<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">shift<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">unshift<\/code>\ub294 \ubaa8\ub450&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/splice.html\">splice<\/a>\uc758 \ud2b9\ubcc4\ud55c \uacbd\uc6b0\uc774\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">splice<\/code>\ub294 \ubc30\uc5f4\uc758 \uc77c\ubd80\ub97c \uc81c\uac70\ud558\uace0 \ub2e4\ub978 \ubc30\uc5f4\uc758 \uc77c\ubd80\ub85c \uad50\uccb4\ud558\uba70, \uc81c\uac70\ub41c \ubd80\ubd84\uc744 \ubc18\ud658\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print splice(@stack, 1, 4, \"&lt;&lt;&lt;\", \"&gt;&gt;&gt;\"); # GraceEileenDeniseBob\"\nprint @stack; # \"Hank&lt;&lt;&lt;&gt;&gt;&gt;Alice\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\uae30\uc874 \ubc30\uc5f4\ub85c\ubd80\ud130 \uc0c8\ub85c\uc6b4 \ubc30\uc5f4\uc744 \uc0dd\uc131\ud558\uae30<\/h3><p style=\"font-family: Gulim; font-size: small;\">\ubc30\uc5f4\uc744 \uc774\uc6a9\ud558\uc5ec \uc0c8\ub85c\uc6b4 \ubc30\uc5f4 \ub610\ub294 \uc2a4\uce7c\ub77c \ub4f1\ub4f1\uc744 \uc0dd\uc131\ud558\ub294 \ud568\uc218\ub85c \ub2e4\uc74c\uacfc \uac19\uc740 \uac83\ub4e4\uc774 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/join.html\">join<\/a>&nbsp;\ud568\uc218\ub85c \uc5ec\ub7ec \ubb38\uc790\uc5f4\uc744 \ud558\ub098\ub85c \ud569\uce5c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @elements = (\"Antimony\", \"Arsenic\", \"Aluminum\", \"Selenium\");\nprint @elements; # \"AntimonyArsenicAluminumSelenium\"\nprint \"@elements\"; # \"Antimony Arsenic Aluminum Selenium\"\nprint join(\", \", @elements); # \"Antimony, Arsenic, Aluminum, Selenium\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/reverse.html\">reverse<\/a>&nbsp;\ud568\uc218\ub294 \ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c\ub294 \ubc30\uc5f4\uc744 \ub4a4\uc9d1\uc740 \ub9ac\uc2a4\ud2b8\ub97c \ubc18\ud658\ud558\uba70, \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c\ub294 \uc804\uccb4 \ub9ac\uc2a4\ud2b8\ub97c \ud558\ub098\uc758 \ubb38\uc790\uc5f4\ub85c \ud569\uce5c \ud6c4 \uadf8\uac83\uc744 \ub4a4\uc9d1\uc740 \ubb38\uc790\uc5f4\uc744 \ubc18\ud658\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print reverse(\"Hello\", \"World\"); # \"WorldHello\"\nprint reverse(\"HelloWorld\"); # \"HelloWorld\"\nprint scalar reverse(\"HelloWorld\"); # \"dlroWolleH\"\nprint scalar reverse(\"Hello\", \"World\"); # \"dlroWolleH\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/map.html\">map<\/a>&nbsp;\ud568\uc218\ub294 \ubc30\uc5f4\uc744 \uc785\ub825\uc73c\ub85c \ubc1b\uc544 \ubc30\uc5f4\uc758 \ubaa8\ub4e0 \uc6d0\uc18c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$_<\/code>\uc5d0 \uc5b4\ub5a4 \uc870\uc791\uc744 \uac00\ud558\uc5ec \uadf8 \uacb0\uacfc\ub4e4\ub85c \uc0c8\ub85c\uc6b4 \ubc30\uc5f4\uc744 \uc0dd\uc131\ud55c\ub2e4. \uc5b4\ub5bb\uac8c \uc870\uc791\ud560\uc9c0\ub294 \uc911\uad04\ud638 \uc548\uc5d0 \ud558\ub098\uc758 \ud45c\ud604\uc2dd\uc73c\ub85c \uc9c0\uc815\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @capitals = (\"Baton Rouge\", \"Indianapolis\", \"Columbus\", \"Montgomery\", \"Helena\", \"Denber\", \"Boise\");\n\nprint join, \", \", map { uc $_ } @capitals;\n# \"BATON ROUGE, INDIANAPOLIS, COLUMBUS, MONTGOMERY, HELENA, DENVER, BOISE\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/grep.html\">grep<\/a>&nbsp;\ud568\uc218\ub294 \ubc30\uc5f4\uc744 \ubc1b\uc544 \ud544\ud130\ub9c1\ud558\uc5ec \uacb0\uacfc \ubc30\uc5f4\uc744 \ucd9c\ub825\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">map<\/code>\uacfc \uad6c\ubb38\uc774 \ube44\uc2b7\ud558\ub2e4. \ubc30\uc5f4 \uc785\ub825\uc758 \uac01 \uc6d0\uc18c\ub4e4\uc744&nbsp;<code style=\"color: rgb(52, 130, 117);\">$_<\/code>\ub85c \ubc1b\uc544\uc11c \uccab\ubc88\uc9f8 \uc778\uc790 \ube14\ub7ed\uc5d0\uc11c \uc2e4\ud589\ud55c\ub2e4. \uacb0\uacfc\uac00 \ucc38\uc774\uba74 \uadf8 \uc6d0\uc18c \uc2a4\uce7c\ub77c\ub294 \ucd9c\ub825 \ubc30\uc5f4\ub85c \ub4e4\uc5b4\uac00\uba70 \uac70\uc9d3\uc774\uba74 \ub4e4\uc5b4\uac00\uc9c0 \uc54a\ub294\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print join \", \", grep { length $_ == 6 } @capitals;\n# \"Helena, Denver\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubd84\uba85\ud788 \ucd9c\ub825\ub41c \ubc30\uc5f4\uc758 \ud06c\uae30\ub294 \uc131\uacf5\uc801\uc778 \ub9e4\uce6d \uc22b\uc790\uc774\ub2e4. \uadf8\ub798\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">grep<\/code>\uc744 \uc774\uc6a9\ud558\uc5ec \ud55c \ubc30\uc5f4\uc774 \uc5b4\ub5a4 \uc6d0\uc18c\ub97c \ud3ec\ud568\ud558\uace0 \uc788\ub294\uc9c0\ub97c \uac80\uc0ac\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print scalar grep { $_ eq 'Columbus' } @capitals; # \"1\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">grep<\/code>\uacfc&nbsp;<code style=\"color: rgb(52, 130, 117);\">map<\/code>\uc744 \uc774\uc6a9\ud558\uc5ec \uac15\ub825\ud55c \uae30\ub2a5\uc778&nbsp;<a href=\"https:\/\/en.wikipedia.org\/wiki\/List_comprehension\">\ub9ac\uc2a4\ud2b8 \uc870\uac74\uc81c\uc2dc\ubb38(list comprehensions)<\/a>\uc744 \uad6c\uc131\ud560 \uc218 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/sort.html\">sort<\/a>&nbsp;\ud568\uc218\ub294 \uac04\ub2e8\ud558\uac8c \uc0ac\uc6a9\ud558\uba74 \ubb38\uc790(\uc54c\ud30c\ubcb3) \uc21c\uc11c\ub85c \ubc30\uc5f4\uc744 \uc815\ub82c\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @elevations = (19, 1, 2, 100, 3, 89, 100, 1056);\n\nprint join \", \", sort @elevations;\n# \"1, 100, 100, 1056, 19, 2, 3, 98\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud558\uc9c0\ub9cc&nbsp;<code style=\"color: rgb(52, 130, 117);\">grep<\/code>\uc774\ub098&nbsp;<code style=\"color: rgb(52, 130, 117);\">map<\/code>\uacfc \ub9c8\ucc2c\uac00\uc9c0\ub85c \ucf54\ub4dc\ub97c \uc9c0\uc815\ud560 \uc218 \uc788\ub2e4. \uc815\ub82c\uc740 \ud56d\uc0c1 \ub450 \uc6d0\uc18c\uc758 \ube44\uad50\ub97c \uacc4\uc18d \ubc18\ubcf5\ud558\uc5ec \uc9c4\ud589\ud55c\ub2e4. \ucf54\ub4dc \ube14\ub7ed\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">$a<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">$b<\/code>\ub97c \uc785\ub825\uc73c\ub85c \ubc1b\uc544&nbsp;<code style=\"color: rgb(52, 130, 117);\">$a<\/code>\uac00&nbsp;<code style=\"color: rgb(52, 130, 117);\">$b<\/code>\ubcf4\ub2e4 \uc791\uc73c\uba74 -1\uc744, \uac19\uc73c\uba74 0\uc744, \ud06c\uba74 1\uc744 \ubc18\ud658\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">cmp<\/code>&nbsp;\uc5f0\uc0b0\uc790\ub294 \ubb38\uc790\uc5f4\uc5d0 \ub300\ud574 \uc704\uc758 \ube44\uad50\ub97c \uc218\ud589\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print join \", \", sort { $a cmp $b } @elevations;\n# \"1, 100, 100, 1056, 19, 2, 3, 98\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\"\uc6b0\uc8fc\uc120(spaceship) \uc5f0\uc0b0\uc790\"\ub77c\uace0\ub3c4 \ubd80\ub974\ub294,&nbsp;<code style=\"color: rgb(52, 130, 117);\">&lt;=&gt;<\/code>&nbsp;\uc5f0\uc0b0\uc790\ub294 \uc22b\uc790\uc5d0 \ub300\ud574 \uc704\uc758 \ube44\uad50\ub97c \uc218\ud589\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print join \", \", sort { $a &lt;=&gt; $b } @elevations;\n# \"1, 2, 3, 19, 98, 100, 100, 1056\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">$a<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">$b<\/code>\ub294 \ud56d\uc0c1 \uc2a4\uce7c\ub77c\uc774\ub2e4. \ud558\uc9c0\ub9cc \uc9c1\uc811 \ube44\uad50\ud558\uae30\ub294 \uc5b4\ub824\uc6b4 \ubcf5\uc7a1\ud55c \uac1c\uccb4\uc758 \ucc38\uc870\uc77c \uc218\ub3c4 \uc788\ub2e4. \ubcf5\uc7a1\ud55c \uacfc\uc815\uc744 \uac70\uccd0\uc11c \ube44\uad50\ub97c \ud574\uc57c \ud55c\ub2e4\uba74, \ubcc4\ub3c4\uc758 \uc11c\ube0c\ub8e8\ud2f4\uc744 \ub9cc\ub4e0 \ud6c4 \uadf8 \uc774\ub984\uc744 \uc778\uc790\ub85c \uc774\uc6a9\ud560 \uc218\ub3c4 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub comparator {\n    # \uae34 \ucf54\ub4dc ...\n    # return -1 \ub610\ub294 0, 1\n}\n\nprint join \", \", sort comparator @elevations;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">grep<\/code>\uacfc&nbsp;<code style=\"color: rgb(52, 130, 117);\">map<\/code>\uc740 \uc774\ub7f0 \uc2dd\uc73c\ub85c \uc4f8 \uc218\ub294 \uc5c6\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc11c\ube0c\ub8e8\ud2f4\uacfc \ube14\ub7ed\uc774 \uba85\uc2dc\uc801\uc73c\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$a<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">$b<\/code>&nbsp;\ubcc0\uc218\ub97c \ubc1b\uc9c0 \uc54a\ub294 \uc810\uc5d0 \uc720\uc758\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">$_<\/code>\ucc98\ub7fc&nbsp;<code style=\"color: rgb(52, 130, 117);\">$a<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">$b<\/code>\ub294 \uc804\uc5ed \ubcc0\uc218\ub85c \ube44\uad50\ub97c \ud560 \ub54c\ub9c8\ub2e4 \ube44\uad50\ud560 \uc30d\uc758 \ub450 \uac12\uc774 \ucc44\uc6cc\uc9c4\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\ub0b4\uc7a5 \ud568\uc218\ub4e4<\/h2><p style=\"font-family: Gulim; font-size: small;\">\uc9c0\uae08\uae4c\uc9c0 \uc5ec\ub7ec\uac1c\uc758 \ub0b4\uc7a5 \ud568\uc218\ub4e4\uc744 \ubd10\uc654\ub2e4:&nbsp;<code style=\"color: rgb(52, 130, 117);\">print<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">sort<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">map<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">grep<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">keys<\/code>,&nbsp;<code style=\"color: rgb(52, 130, 117);\">scalar<\/code>. \ub0b4\uc7a5 \ud568\uc218\ub294 \ud384\uc758 \uac15\uc810 \uc911 \ud558\ub098\ub2e4. \ub0b4\uc7a5 \ud568\uc218\ub4e4\uc740<\/p>\n<ul style=\"font-family: Gulim; font-size: small;\"><li>\ud48d\ubd80\ud558\uba70<\/li><li>\ub9e4\uc6b0 \uc720\uc6a9\ud558\uba70<\/li><li><a href=\"http:\/\/perldoc.perl.org\/perlfunc.html\">\ubb38\uc11c\ud654\uac00 \uc798 \ub418\uc5b4 \uc788\uace0<\/a><\/li><li>\uad6c\ubb38\uc5d0 \ubcc0\ud654\uac00 \ub9ce\ub2e4. \uadf8\ub798\uc11c \ubb38\uc11c\ub97c \uaf2d \ud655\uc778\ud574\uc57c \ud55c\ub2e4.<\/li><li>\uc815\uaddc\uc2dd\uc744 \uc778\uc790\ub85c \ubc1b\ub294 \uacbd\uc6b0\ub3c4 \uc788\uace0<\/li><li>\ucf54\ub4dc \ube14\ub7ed\uc744 \uc778\uc790\ub85c \ubc1b\ub294 \uacbd\uc6b0\ub3c4 \uc788\uc73c\uba70<\/li><li>\uc778\uc790\ub4e4 \uc0ac\uc774\uc5d0 \uc27c\ud45c\uac00 \ud544\uc694\uc5c6\ub294 \uacbd\uc6b0\ub3c4 \uc788\uc73c\uba70<\/li><li>\uc784\uc758\uc758 \uc22b\uc790\uc758 \uc27c\ud45c\ub85c \uad6c\ubd84\ub41c \uc778\uc790\ub97c \ubc1b\uc744 \uc218 \uc788\ub294 \uacbd\uc6b0\ub3c4 \uc788\uace0 \uc544\ub2cc \uacbd\uc6b0\ub3c4 \uc788\uc73c\uba70<\/li><li>\ud544\uc694\ud55c \uc778\uc790\ubcf4\ub2e4 \ub354 \uc801\uc740 \uc218\uc758 \uc778\uc790\uac00 \ub4e4\uc5b4\uc628 \uacbd\uc6b0 \uc801\uc808\ud55c \uc778\uc790\ub85c \ucc44\uc6b0\ub294 \uacbd\uc6b0\ub3c4 \uc788\ub2e4<\/li><li>\uc560\ub9e4\ubaa8\ud638\ud55c \uacbd\uc6b0\uac00 \uc544\ub2c8\ub77c\uba74 \ub300\uccb4\ub85c \uc778\uc790\ub97c \uad04\ud638\ub85c \ubb36\uc744 \ud544\uc694\ub294 \uc5c6\ub2e4<\/li><\/ul><p style=\"font-family: Gulim; font-size: small;\">\ub0b4\uc7a5 \ud568\uc218\ub4e4\uc5d0 \ub300\ud574 \uc870\uc5b8\ud558\uc790\uba74&nbsp;<strong>\uc5b4\ub5a4 \uac83\ub4e4\uc774 \uc874\uc7ac\ud558\ub294\uc9c0 \uc544\ub294 \uac83<\/strong>\uc774 \uac00\uc7a5 \uc911\uc694\ud558\ub2e4\ub294 \uc810\uc774\ub2e4. \ub098\uc911\uc5d0 \ucc38\uc870\ud574 \ubcfc \uc218 \uc788\ub3c4\ub85d \ubb38\uc11c\ub97c \ud6d1\uc5b4 \ubd10\ub450\ub294 \uac8c \uc88b\ub2e4. \ub108\ubb34 \uc800\uc218\uc900\uc774\uac70\ub098, \ub610\ub294 \uc774\uc804\uc5d0 \uc790\uc8fc \ud574\ubd24\uae30\uc5d0 \ud754\ud55c \uacbd\uc6b0\ub77c \uc0dd\uac01\ub418\ub294 \uc791\uc5c5\uc744 \uc218\ud589\ud55c\ub2e4\uba74 \ub0b4\uc7a5 \ud568\uc218\uc5d0 \uadf8 \ub2f5\uc774 \uc788\uc744 \uac00\ub2a5\uc131\uc774 \uc788\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\uc0ac\uc6a9\uc790 \uc815\uc758 \uc11c\ube0c\ub8e8\ud2f4<\/h2><p style=\"font-family: Gulim; font-size: small;\">\uc11c\ube0c\ub8e8\ud2f4\uc740&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/sub.html\">sub<\/a>&nbsp;\uc608\uc57d\uc5b4\ub85c \uc120\uc5b8\ud55c\ub2e4. \ub0b4\uc7a5 \ud568\uc218\ub4e4\uacfc\ub294 \ub2e4\ub974\uac8c \uc0ac\uc6a9\uc790 \uc815\uc758 \uc11c\ube0c\ub8e8\ud2f4\uc740 \ud56d\uc0c1 \uc2a4\uce7c\ub77c \ub9ac\uc2a4\ud2b8\ub97c \uc785\ub825\uc73c\ub85c \ubc1b\ub294\ub2e4. \uc785\ub825\uc73c\ub85c \ubc1b\ub294 \ub9ac\uc2a4\ud2b8\ub294 \ubb3c\ub860 \uc6d0\uc18c\uac00 \ud558\ub098\ub9cc\uc77c \uc218\ub3c4 \uc788\uace0 \uc544\uc608 \uc5c6\uc744 \uc218\ub3c4 \uc788\ub2e4. \ud558\ub098\uc758 \uc2a4\uce7c\ub77c\ub294 \uc6d0\uc18c \ud558\ub098\uc9dc\ub9ac \ub9ac\uc2a4\ud2b8\ub85c \ubc1b\ub294\ub2e4. N\uac1c \uc694\uc18c\uc758 \ud574\uc2dc\ub294 2N \uc6d0\uc18c\uc758 \ub9ac\uc2a4\ud2b8\ub85c \ubc1b\ub294\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uad04\ud638\ub294 \uc635\uc158\uc774\uc9c0\ub9cc, \uc11c\ube0c\ub8e8\ud2f4\uc740 \ube44\ub85d \uc778\uc790\uac00 \uc5c6\uc744\uc9c0\ub77c\ub3c4 \uad04\ud638\ub97c \uc774\uc6a9\ud574\uc11c \ud638\ucd9c\ud558\ub294 \uac8c \uc88b\ub2e4. \uc11c\ube0c\ub8e8\ud2f4 \ud638\ucd9c\uc774\ub77c\ub294 \uac83\uc744 \uba85\ud655\ud788 \ud560 \uc218 \uc788\uae30 \ub54c\ubb38\uc774\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc11c\ube0c\ub8e8\ud2f4 \uc548\uc5d0\uc11c\ub294 \uc778\uc790\ub294&nbsp;<a href=\"http:\/\/perldoc.perl.org\/perlvar.html\">\ub0b4\uc7a5 \ubc30\uc5f4 \ubcc0\uc218<\/a>&nbsp;<code style=\"color: rgb(52, 130, 117);\">@_<\/code>\ub85c \uc811\uadfc\ud560 \uc218 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub hyphenate {\n    # \ubc30\uc5f4\uc758 \uccab\uc9f8 \uc6d0\uc18c\ub97c \ucd94\ucd9c\ud558\uace0 \ub098\uba38\uc9c0\ub294 \ubb34\uc2dc\ud55c\ub2e4\n    my $word = shift @_;\n\n    # An overly clever list comprehension\n    $word = join \"-\", map { substr $word, $_, 1 } (0 .. (length $word) - 1);\n    return $word;\n}\n\nprint hyphenate(\"exterminate\"); # \"e-x-t-e-r-m-i-n-a-t-e\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\uc778\uc790\ub4e4\uc744 \ud480\uc5b4\ub0b4\uae30(unpacking arguments)<\/h3><p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">@_<\/code>\uc5d0\uc11c \uc778\uc790\ub97c \uaebc\ub0b4\ub824\uba74 \uc5ec\ub7ec \ubc29\ubc95\uc744 \uc4f8 \uc218 \uc788\uc9c0\ub9cc \uadf8\uc911\uc5d0\uc11c\ub3c4 \ub354 \uc88b\uc740 \ubc29\ubc95\uc740 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc544\ub798 \uc608\uc81c\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">left_pad<\/code>\ub294 \uc8fc\uc5b4\uc9c4 \ucc44\uc6c0 \ubb38\uc790\ub85c \ud544\uc694\ud55c \uae38\uc774\ub9cc\ud07c \ubb38\uc790\uc5f4\uc744 \ucc44\uc6b4\ub2e4. (\uc5ec\uae30\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">x<\/code>&nbsp;\ud568\uc218\ub294 \ubb38\uc790\uc5f4\uc744 \uc8fc\uc5b4\uc9c4 \uc22b\uc790\ub9cc\ud07c \ubcf5\uc0ac\ud574\uc11c \ud569\uce5c\ub2e4.) (\uc8fc\uc758\uc810: \uac04\ub2e8\ud558\uac8c \ud558\uae30 \uc704\ud574\uc11c \uc608\uc81c\uc758 \uc11c\ube0c\ub8e8\ud2f4\ub4e4\uc740 \uae30\ubcf8\uc801\uc778 \uc5d0\ub7ec \uac80\uc0ac\ub97c \ube90\ub2e4. \uc774\ub97c\ud14c\uba74, \ucc44\uc6c0 \ubb38\uc790\ub294 \ud55c\uac1c\uc5ec\uc57c \ud55c\ub2e4\ub4e0\uc9c0, \uc9c0\uc815\ud55c \uae38\uc774\ub294 \ub300\uc0c1 \ubb38\uc790\uc5f4\ubcf4\ub2e4 \uae38\uc5b4\uc57c \ud55c\ub2e4\ub4e0\uc9c0, \ud544\uc694\ud55c \uc778\uc218\uac00 \ubaa8\ub450 \ub4e4\uc5b4\uc640\uc57c \ud55c\ub2e4\ub4e0\uc9c0 \ud558\ub294 \uac83\ub4e4\uc774\ub2e4.)<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">left_pad<\/code>\ub294 \ubcf4\ud1b5 \ub2e4\uc74c\uacfc \uac19\uc740 \uc2dd\uc73c\ub85c \ud638\ucd9c\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print left_pad(\"hello\", 10, \"+\"); # \"+++++hello\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<ol style=\"font-family: Gulim; font-size: small;\"><li><p>\uc5b4\ub5a4 \uc0ac\ub78c\ub4e4\uc740 \uc778\uc790\ub97c \ubc1b\uc9c0 \uc54a\uace0&nbsp;<code style=\"color: rgb(52, 130, 117);\">@_<\/code>\ub97c \uadf8\ub300\ub85c \uc0ac\uc6a9\ud55c\ub2e4. \uc774\ub7f0 \ubc29\ubc95\uc740 \uc9c0\uc800\ubd84\ud574\uc11c \uad8c\uc7a5\ud558\uc9c0 \uc54a\ub294 \ubc29\uc2dd\uc774\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub left_pad {\n    my $newString = ($_[2] x ($_[1] - length $_[0])) . $_[0];\n    return $newString;\n}<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<\/li><li><p>\uc778\ub371\uc2a4\ub85c \uc811\uadfc\ud574\uc11c \uac12\uc744 \uaebc\ub0b4\ub294 \ubc29\uc2dd\uc740 \uc870\uae08\uc740 \ub0ab\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub left_pad {\n    my $oldString = $_[0];\n    my $width     = $_[1];\n    my $padChar   = $_[2];\n    my $newString = ($padChar x ($width - length $oldString)) . $oldString;\n    return $newString;\n}<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<\/li><li><p>\uc778\uc790\uac00 4\uac1c \uc774\ub0b4\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">shift<\/code>\ub97c \uc774\uc6a9\ud558\uc5ec&nbsp;<code style=\"color: rgb(52, 130, 117);\">@_<\/code>\uc5d0\uc11c \uac12\uc744 \uaebc\ub0b4\ub294 \ubc29\ubc95\uc774 \ucd94\ucc9c\ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub left_pad {\n    my $oldString = shift @_;\n    my $width     = shift @_;\n    my $padChar   = shift @_;\n    my $newString = ($padChar x ($width - length $oldString)) . $oldString;\n    return $newString;\n}<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p><code style=\"color: rgb(52, 130, 117);\">shift<\/code>&nbsp;\ud568\uc218\uc5d0 \uc544\ubb34\ub7f0 \ubc30\uc5f4\uc774 \uc8fc\uc5b4\uc9c0\uc9c0 \uc54a\uc73c\uba74 \ubb35\uc2dc\uc801\uc73c\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">@_<\/code>&nbsp;\ub97c \ub300\uc0c1\uc73c\ub85c \uc791\uc5c5\uc744 \ud55c\ub2e4. \uc544\ub798\uc640 \uac19\uc740 \ubc29\uc2dd\uc740 \uc544\uc8fc \uc790\uc8fc \ub098\uc628\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub left_pad {\n    my $oldString = shift;\n    my $width     = shift;\n    my $padChar   = shift;\n    my $newString = ($padChar x ($width - length $oldString)) . $oldString;\n    return $newString;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p>4\uac1c\ub97c \ub118\uc5b4\uac00\uac8c \ub418\uba74 \uc5b4\ub514\uc11c \ubb34\uc5c7\uc744 \ub300\uc785\ud558\uc600\ub294\uc9c0 \ucd94\uc801\ud558\uae30\uac00 \ud798\ub4e4\uc5b4\uc9c4\ub2e4.<\/p>\n<\/li><li><p>\uc2a4\uce7c\ub77c \ub300\uc785\ubb38\uc744 \uc774\uc6a9\ud558\uc5ec \ud55c\uaebc\ubc88\uc5d0&nbsp;<code style=\"color: rgb(52, 130, 117);\">@_<\/code>\ub97c \ud480 \uc218 \uc788\ub2e4. \uc774\uac83\ub3c4 4\uac1c\uae4c\uc9c0\ub294 \uad1c\ucc2e\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub left_pad {\n    my ($oldString, $width, $padChar) = @_;\n    my $newString = ($padChar x ($width - length $oldString)) . $oldString;\n    return $newString;\n}<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<\/li><li><p>\uc778\uc790\uac00 \uc544\uc8fc \ub9ce\uac70\ub098, \ub610\ub294 \uc778\uc790\ub4e4 \uc911 \uba87\uba87 \uc778\uc790\ub4e4\uc740 \ubd80\uac00\uc801\uc778 \uacbd\uc6b0 \uac00\uc7a5 \uc88b\uc740 \ubc29\ubc95\uc740 \uc11c\ube0c\ub8e8\ud2f4\uc744 \ud574\uc2dc \ud615\ud0dc\uc758 \uc778\uc790\ub85c \ud638\ucd9c\ud558\uac8c \ud558\ub294 \uac83\uc774\ub2e4. \uc774\ub7f4 \uacbd\uc6b0\uc5d0\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">@_<\/code>\ub97c \ud574\uc2dc\ub85c \ubcc0\ud658\ud55c\ub2e4. \uc608\uc81c\uc758 \uc11c\ube0c\ub8e8\ud2f4 \ud638\ucd9c\uc740 \uc544\ub798\uc640 \uac19\uc740 \uc2dd\uc73c\ub85c \ubc14\ub010\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print left_pad(\"oldString\" =&gt; \"pod\", \"width\" =&gt; 10, \"padChar\" =&gt; \"+\");<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p>\uadf8\ub9ac\uace0 \uc11c\ube0c\ub8e8\ud2f4\uc740 \uc544\ub798\uc640 \uac19\uc740 \uc2dd\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub left_pad {\n    my %args = @_;\n    my $newString = ($args{\"padChar\"} x ($args{\"width\"} - length $args{\"oldString\"})) . $args{\"oldString\"};\n    return $newString;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<\/li><\/ol><h3 style=\"font-family: Gulim;\">\uacb0\uacfc \ubc18\ud658\ud558\uae30<\/h3><p style=\"font-family: Gulim; font-size: small;\">\ud384\uc758 \ub2e4\ub978 \ud45c\ud604\uc2dd\uacfc \ub9c8\ucc2c\uac00\uc9c0\ub85c \uc11c\ube0c\ub8e8\ud2f4 \ud638\ucd9c\ub3c4 \ubb38\ub9e5\uc5d0 \ub530\ub77c \ub2e4\ub974\uac8c \ub3d9\uc791\ud558\uac8c \ud560 \uc218 \uc788\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">wantarray<\/code>(\uc0ac\uc2e4&nbsp;<code style=\"color: rgb(52, 130, 117);\">wantlist<\/code>\ub85c \uc774\ub984\uc9d3\ub294 \uac8c \ub354 \ub098\uc558\uc73c\ub828\ub9cc) \ud568\uc218\ub97c \uc774\uc6a9\ud558\uc5ec \uc11c\ube0c\ub8e8\ud2f4\uc774 \ud3c9\uac00\ub418\ub294 \ubb38\ub9e5\uc744 \uac10\uc9c0\ud574\uc11c \ubb38\ub9e5\uc5d0 \uc801\ub2f9\ud55c \uacb0\uacfc\uac12\uc744 \ubc18\ud658\ud558\uac8c \ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">sub contextualSubroutine {\n    # \ud638\ucd9c\ud558\ub294 \uce21\uc774 \ub9ac\uc2a4\ud2b8\ub97c \uc694\uad6c\ud558\ubbc0\ub85c \ub9ac\uc2a4\ud2b8\ub97c \ubc18\ud658\n    return (\"Everest\", \"K2\", \"Etna\") if wantarray;\n\n    # \ud638\ucd9c\ud558\ub294 \uce21\uc774 \uc2a4\uce7c\ub77c\ub97c \uc694\uad6c. \uc2a4\uce7c\ub77c\ub97c \ubc18\ud658\n    return 3;\n}\n\nmy @array = contextualSubroutine();\nprint @array; # \"EverestK2Etna\"\n\nmy $scalar = contextualSubroutine();\nprint $scalar; # \"3\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h2 style=\"font-family: Gulim;\">\uc2dc\uc2a4\ud15c \ucf5c<\/h2><p style=\"font-family: Gulim; font-size: small;\">\uc774\ubbf8 \uc54c\uace0 \uc788\ub294 \uc0ac\ub78c\ub3c4 \uc788\uaca0\uc9c0\ub9cc, \uc708\ub3c4\uc6b0\uc988\ub098 \ub9ac\ub205\uc2a4 \uc2dc\uc2a4\ud15c\uc5d0\uc11c\ub294(\uadf8\ub9ac\uace0 \uc544\ub9c8\ub3c4 \uac70\uc758 \ubaa8\ub4e0 \ub2e4\ub978 \uc2dc\uc2a4\ud15c\uc5d0\uc11c \uadf8\ub7f4\uaebc\ub77c \uc0dd\uac01\ud558\ub294\ub370), \ubaa8\ub4e0 \ud504\ub85c\uc138\uc2a4\uac00 \ub05d\ub0a0 \ub54c 16\ube44\ud2b8\uc758&nbsp;<em>\uc0c1\ud0dc \uc6cc\ub4dc(status word)<\/em>\ub97c \ub0b4\ub193\ub294\ub2e4. \uc0c1\uc704 8\ube44\ud2b8\ub294 0~255\uc0ac\uc774\uc758 \uac12\uc744 \uac16\ub294&nbsp;<em>\ub9ac\ud134\ucf54\ub4dc(return code)<\/em>\ub97c \uc774\ub8e8\ub294\ub370 \ubcf4\ud1b5 0\uc740 \uc131\uacf5\uc801\uc73c\ub85c \uc2e4\ud589\ud588\uc74c\uc744 \ub098\ud0c0\ub0b4\uace0 \uadf8\uc678\uc758 \uac12\ub4e4\uc740 \uc5ec\ub7ec\uac00\uc9c0 \uc2e4\ud328 \uc0c1\ud669\uc744 \ub098\ud0c0\ub0b8\ub2e4. \ub098\uba38\uc9c0 8\ube44\ud2b8\ub294 \uc790\uc8fc \uc0ac\uc6a9\ub418\uc9c0 \uc54a\ub294\ub370 - \uadf8\uac83\uc740 \ucf54\uc5b4 \ub364\ud504(core dump)\ub098 \uc2dc\uadf8\ub110(signal) death\uc640 \uac19\uc740 \uc2e4\ud328 \uc0c1\ud669(mode of failure)\uc744 \ubc18\uc601\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud384 \uc2a4\ud06c\ub9bd\ud2b8\uc5d0\uc11c&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/exit.html\">exit<\/a>&nbsp;\ud568\uc218\ub97c \uc0ac\uc6a9\ud558\uba74 \uc6d0\ud558\ub294 \ub9ac\ud134 \ucf54\ub4dc\ub85c \uc2a4\ud06c\ub9bd\ud2b8\ub97c \ub05d\ub0bc \uc218 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud384\uc5d0\ub294 \ud55c\ubc88\uc758 \ud638\ucd9c\ub85c \uc790\uc2dd \ud504\ub85c\uc138\uc2a4\ub97c \uc0dd\uc131\ud558\uace0 \uadf8 \ud504\ub85c\uc138\uc2a4\uac00 \ub05d\ub0a0 \ub54c\uae4c\uc9c0 \ud604\uc7ac \uc2a4\ud06c\ub9bd\ud2b8\uac00 \uae30\ub2e4\ub9ac\uac8c \ud558\ub294 \ubc29\ubc95\uc774 \uc5ec\ub7ec\uac00\uc9c0 \uc788\ub2e4. \uc5b4\ub5a4 \ubc29\ubc95\uc744 \uc4f0\ub4e0 \uc790\uc2dd \ud504\ub85c\uc138\uc2a4\uac00 \ub05d\ub0ac\uc73c\uba74 \uadf8 \uc0c1\ud0dc \uc6cc\ub4dc\ub294&nbsp;<a href=\"http:\/\/perldoc.perl.org\/perlvar.html\">\ub0b4\uc7a5 \uc2a4\uce7c\ub77c \ubcc0\uc218<\/a>\uc778&nbsp;<code style=\"color: rgb(52, 130, 117);\">$?<\/code>\uc5d0 \uc800\uc7a5\ub41c\ub2e4. \ub9ac\ud134 \ucf54\ub4dc\ub294 \uc774 16\ube44\ud2b8 \ubcc0\uc218\uc758 \uc0c1\uc704 8\ube44\ud2b8\ub97c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$? &gt;&gt; 8<\/code>&nbsp;\uac19\uc740 \ubc29\uc2dd\uc73c\ub85c \ubf51\uc544\ub0b4\uc11c \uc5bb\uc744 \uc218 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/system.html\">system<\/a>&nbsp;\ud568\uc218\ub294 \ub2e4\ub978 \ud504\ub85c\uadf8\ub7a8\uc744 \uc8fc\uc5b4\uc9c4 \uc778\uc790\ub85c \uc2e4\ud589\uc2dc\ud0a8\ub2e4. \uc774 \ud568\uc218\uc758 \ubc18\ud658\uac12\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">$?<\/code>\uc5d0 \uc800\uc7a5\ub41c \uac12\uacfc \uac19\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $rc = system \"perl\", \"anotherscript.pl\", \"foo\", \"bar\", \"baz\";\n$rc &gt;&gt;= 8;\nprint $rc; # \"37\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ed\ub530\uc634\ud45c ````\ub97c \uc4f0\uba74 \uba85\ub839\ud589\uc5d0\uc11c \ub0b4\ub9ac\ub294 \uba85\ub839\uc5b4\ub97c \uc2e4\ud589\uc2dc\ud0a4\uace0 \uadf8 \uba85\ub839\uc758 \ud45c\uc900 \ucd9c\ub825 \uacb0\uacfc\ub97c \ubc1b\uc744 \uc218 \uc788\ub2e4. \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c\ub294 \uacb0\uacfc\uac00 \ud558\ub098\uc758 \ubb38\uc790\uc5f4\ub85c \ubc18\ud658\ub418\uace0, \ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c\ub294 \uacb0\uacfc\uac00 \uc904\ub2e8\uc704\ub85c \ub098\ub25c \ubb38\uc790\uc5f4 \ubc30\uc5f4\uc774 \ubc18\ud658\ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $text = `perl anotherscript.pl foo bar baz`;\nprint $text; # \"foobarbaz\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">anotherscript.pl<\/code>\uc740 \ub2e4\uc74c\uacfc \uac19\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nprint @ARGV;\nexit 37;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h2 style=\"font-family: Gulim;\">\ud30c\uc77c\uacfc \ud30c\uc77c \ud578\ub4e4<\/h2><p style=\"font-family: Gulim; font-size: small;\">\uc2a4\uce7c\ub77c \ubcc0\uc218\uc5d0\ub294 \uc22b\uc790\/\ubb38\uc790\uc5f4\/\ucc38\uc870\/undef \uc678\uc5d0&nbsp;<em>\ud30c\uc77c \ud578\ub4e4(file handle)<\/em>\ub3c4 \ub300\uc785\ud560 \uc218 \uc788\ub2e4. \ud30c\uc77c \ud578\ub4e4\uc774\ub780 \ud2b9\uc815 \ud30c\uc77c\uc758 \ud2b9\uc815 \uc704\uce58\ub97c \ucc38\uc870\ud558\uace0 \uc788\ub294 \uac83\uc774\ub77c \ud560 \uc218 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/open.html\">open<\/a>&nbsp;\ud568\uc218\ub97c \uc774\uc6a9\ud558\uc5ec \uc2a4\uce7c\ub77c \ubcc0\uc218\ub97c \ud30c\uc77c \ud578\ub4e4\ub85c \ub9cc\ub4e4 \uc218 \uc788\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">open<\/code>&nbsp;\ud568\uc218\ub97c \ud638\ucd9c\ud560 \ub54c\ub294 \ubc18\ub4dc\uc2dc \ubaa8\ub4dc\ub97c \uc9c0\uc815\ud574\uc57c \ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">&lt;<\/code>&nbsp;\ubaa8\ub4dc\ub85c \ud30c\uc77c\uc744 \uc77d\uae30 \uc704\ud574 \uc5f0\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $f = \"text.txt\";\nmy $result = open my $fh, \"&lt;\", $f;\n\nif(!$result) {\n    <a href=\"http:\/\/perldoc.perl.org\/functions\/die.html\">die<\/a> \"Couldn't open '\".$f.\"' for reading because: \".$!;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud638\ucd9c\uc774 \uc131\uacf5\ud558\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">open<\/code>\uc740 \ucc38\uac12\uc744 \ubc18\ud658\ud55c\ub2e4. \ub9cc\uc57d \uc2e4\ud328\ud558\uba74 false \uac12\uc744 \ubc18\ud658\ud558\uace0 \uc5d0\ub7ec \uba54\uc2dc\uc9c0\ub294 \ub0b4\uc7a5 \ubcc0\uc218&nbsp;<code style=\"color: rgb(52, 130, 117);\">$!<\/code>\uc5d0 \ub2f4\uaca8\uc9c4\ub2e4. \uc704 \uc608\uc81c\uc5d0\uc11c \ubcf4\ub294 \ubc14\uc640 \uac19\uc774&nbsp;<code style=\"color: rgb(52, 130, 117);\">open<\/code>&nbsp;\ud568\uc218 \ud638\ucd9c\uc774 \uc131\uacf5\ud588\ub294\uc9c0 \ud655\uc778\ud558\ub294 \uac8c \uc88b\ub2e4. \ud655\uc778 \uacfc\uc815\uc774 \uc880 \uc9c0\ub8e8\ud558\uae30 \ub54c\ubb38\uc5d0 \ub9ce\uc774\ub4e4 \ub2e4\uc74c\uacfc \uac19\uc774 \uc904\uc5ec\uc4f4\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">open(my $fh, \"&lt;\", $f) || die \"Couldn't open '\".$f.\"' for reading because: \".$!;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30\uc5d0\uc120&nbsp;<code style=\"color: rgb(52, 130, 117);\">open<\/code>\uc744 \ud638\ucd9c\ud560 \ub54c \uad04\ud638\ub97c \uc0ac\uc6a9\ud574\uc57c\ub9cc \ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud30c\uc77c \ud578\ub4e4\ub85c\ubd80\ud130 \ud55c\uc904\uc744 \uc77d\uc73c\ub824\uba74&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/readline.html\">readline<\/a>&nbsp;\ub0b4\uc7a5 \ud568\uc218\ub97c \uc774\uc6a9\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">readline<\/code>\uc740 \uc904\ub05d \ubb38\uc790\ub97c \ud3ec\ud568\ud55c \uc644\uc804\ud55c \ud55c\uc904\uc758 \ubb38\uc790\uc5f4\uc744 \ubc18\ud658\ud558\uba70 \ud30c\uc77c \ub05d\uc5d0 \uc774\ub974\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">undef<\/code>\ub97c \ubc18\ud658\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">while(1) {\n    my $line = readline $fh;\n    last unless defined $line;\n    # process the line...\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub9e8 \ub05d\uc5d0 \ubd99\uc740 \uc904\ub05d \ubb38\uc790\ub97c \uc798\ub77c\ub0b4\ub824\uba74&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/chomp.html\">chomp<\/a>&nbsp;\ud568\uc218\ub97c \uc0ac\uc6a9\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">chomp $line;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">chomp<\/code>\ub294 \ubcc0\uc218\ub97c \uc9c1\uc811 \ubcc0\uacbd\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">$line = chomp $line<\/code>&nbsp;\uc2dd\uc73c\ub85c \uc0ac\uc6a9\ud558\uba74 \uc544\ub9c8 \ub2e4\ub978 \uacb0\uacfc\ub97c \uc5bb\uac8c \ub420 \uac83\uc774\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/eof.html\">eof<\/a>\ub97c \uc0ac\uc6a9\ud558\uc5ec \ud30c\uc77c \ub05d\uc778\uc9c0 \uac80\uc0ac\ud560 \uc218 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">while(!eof $fh) {\n    my $line = readline $fh;\n    # process $line...\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub7ec\ub098&nbsp;<code style=\"color: rgb(52, 130, 117);\">while (my $line = readline $fh)<\/code>\uc640 \uac19\uc740 \uc2dd\uc73c\ub85c \uc4f0\ub824\uba74 \uc870\uc2ec\ud574\uc57c \ud55c\ub2e4. \uc65c\ub0d0\ud558\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">$line<\/code>&nbsp;\uc774 \"0\" \uc774\ub77c\uba74 \ubc18\ubcf5\ubb38\uc740 \ubbf8\ucc98 \ud30c\uc77c \ub05d\uc5d0 \ub2e4\ub2e4\ub974\uae30\ub3c4 \uc804\uc5d0 \ub05d\ub098\ubc84\ub9ac\uace0 \ub9d0\uac8c \ub420 \uac83\uc774\uae30 \ub54c\ubb38\uc774\ub2e4. \uc694\ub7f0 \ubc29\uc2dd\uc73c\ub85c \uc0ac\uc6a9\ud558\uae30 \uc704\ud574 \ud384\uc5d0\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">&lt;&gt;<\/code>&nbsp;\uc5f0\uc0b0\uc790\uac00 \uc788\ub2e4. \uc774 \uc5f0\uc0b0\uc790\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">readline<\/code>&nbsp;\ud568\uc218\ub97c \uc880\ub354 \uc548\uc804\ud558\uac8c \uc0ac\uc6a9\ud560 \uc218 \uc788\ub3c4\ub85d \uac10\uc2fc \uac83\uc774\ub2e4. \uc544\ub798\uc640 \uac19\uc740 \ucf54\ub4dc\ub294 \ub9e4\uc6b0 \uc790\uc8fc \uc0ac\uc6a9\ub418\uba70 \uc644\uc804\ud788 \uc548\uc804\ud55c \ucf54\ub4dc\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">while(my $line = &lt;$fh&gt;) {\n    # process $line...\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub9ac\uace0 \ub354\uc6b1 \uc904\uc774\uba74<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">while(&lt;$fh&gt;) {\n    # process $_...\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud30c\uc77c\uc5d0 \uc4f0\ub824\uba74 \ub2e4\ub978 \ubaa8\ub4dc\ub85c \uc5f4\uc5b4\uc57c \ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">&gt;<\/code>&nbsp;\ubaa8\ub4dc\ub294 \uadf8 \ud30c\uc77c\uc5d0 \uc4f0\uae30 \uc704\ud574 \uc5f0\ub2e4\ub294 \uac83\uc744 \uc54c\ub9b0\ub2e4. (<code style=\"color: rgb(52, 130, 117);\">&gt;<\/code>&nbsp;\ub97c \uc4f0\uba74 \uc774\ubbf8 \uc788\ub294 \ud30c\uc77c \ub0b4\uc6a9\uc740 \uc9c0\uc6cc\uc9c4\ub2e4. \uc774\ubbf8 \uc874\uc7ac\ud558\ub294 \ud30c\uc77c\uc5d0 \ub0b4\uc6a9\uc744 \ucd94\uac00\ud558\uae30 \uc704\ud574\uc11c\ub77c\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">&gt;&gt;<\/code>&nbsp;\ubaa8\ub4dc\ub97c \uc774\uc6a9\ud574\uc57c \ud55c\ub2e4.) \uadf8\ub9ac\uace0&nbsp;<code style=\"color: rgb(52, 130, 117);\">print<\/code>&nbsp;\ud568\uc218\uc758 0\ubc88\uc9f8 \uc778\uc790\ub85c \uadf8 \ud30c\uc77c \ud578\ub4e4\uc744 \uc9c0\uc815\ud558\uba74 \ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">open(my $fh2, \"&gt;\", $f) || die \"Couldn't open '\".$f.\"' for writing because: \".$!;\nprint $fh2 \"The eagles have left the nest\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">$fh2<\/code>&nbsp;\ud30c\uc77c \ud578\ub4e4\uacfc \uadf8 \ub2e4\uc74c \uc778\uc790 \uc0ac\uc774\uc5d0 \uc27c\ud45c\ub294 \uc5c6\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud30c\uc77c \ud578\ub4e4\uc740 \ubcc0\uc218\uc758 \ud6a8\ub825 \ubc94\uc704\uac00 \uc9c0\ub098\uc11c \ubcc0\uc218\uac00 \uc18c\uba78\ub420 \ub54c \ub2eb\ud78c\ub2e4. \uc9c1\uc811 \ub2eb\uc744 \uc218\ub3c4 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\"><a href=\"http:\/\/perldoc.perl.org\/functions\/close.html\">close<\/a> $fh2;\nclose $fh;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc804\uc5ed \uc0c1\uc218\ub85c \uc138\uac1c\uc758 \ud30c\uc77c \ud578\ub4e4\uc774 \uc788\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">STDIN, STDOUT, STDERR<\/code>\uac00 \uadf8\uac83\uc774\ub2e4. \uc774\ub4e4\uc740 \uc2a4\ud06c\ub9bd\ud2b8\uac00 \uc2dc\uc791\ub420 \ub54c \uc790\ub3d9\uc801\uc73c\ub85c \uc5f4\ub9b0\ub2e4. \uc0ac\uc6a9\uc790\uc758 \uc785\ub825\uc744 \ud55c\uc904 \uc77d\uc73c\ub824\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $line = &lt;STDIN&gt;;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc0ac\uc6a9\uc790\uac00 \uc5d4\ud130\ud0a4\ub97c \ub204\ub97c \ub54c\uae4c\uc9c0 \uae30\ub2e4\ub9ac\ub824\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">&lt;STDIN&gt;;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">&lt;&gt;<\/code>\uacfc \uac19\uc774 \ud30c\uc77c \ud578\ub4e4\uc744 \uc9c0\uc815\ud558\uc9c0 \uc54a\uace0 \uc0ac\uc6a9\ud558\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">STDIN<\/code>\uc73c\ub85c\ubd80\ud130 \uc77d\uac70\ub098, \ub610\ub294 \ud384 \uc2a4\ud06c\ub9bd\ud2b8\uc5d0 \uc778\uc790\ub85c \uc8fc\uc5b4\uc9c4 \ud30c\uc77c\ub85c\ubd80\ud130 \uc77d\ub294\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc774\ubbf8 \ubcf4\uc558\ub4ef\uc774&nbsp;<code style=\"color: rgb(52, 130, 117);\">print<\/code>\ub294 \ud30c\uc77c \ud578\ub4e4\uc774 \uc9c0\uc815\ub418\uc9c0 \uc54a\uc73c\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">STDOUT<\/code>\uc5d0 \ucd9c\ub825\ud55c\ub2e4.<\/p>\n<h3 style=\"font-family: Gulim;\">\ud30c\uc77c \uac80\uc0ac<\/h3><p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">-e<\/code>&nbsp;\ub0b4\uc7a5 \ud568\uc218\ub294 \uc778\uc790\ub85c \uc8fc\uc5b4\uc9c4 \uc774\ub984\uc758 \ud30c\uc77c\uc774 \uc788\ub294\uc9c0 \uac80\uc0ac\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"what\" unless -e \"\/usr\/bin\/perl\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">-d<\/code>\ub294 \ub514\ub809\ud130\ub9ac\uc778\uc9c0 \uac80\uc0ac\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">-f<\/code>\ub294 \uc77c\ubc18 \ud30c\uc77c\uc778\uc9c0 \uac80\uc0ac\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc774\ub4e4\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">-X<\/code>&nbsp;\ud615\ud0dc\uc758&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/-X.html\">\uc5ec\ub7ec \ud568\uc218\ub4e4<\/a>&nbsp;\uc911 \ud558\ub098\uc774\ub2e4. \uc5ec\uae30\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">X<\/code>\ub294 \uc18c\ubb38\uc790 \ub610\ub294 \ub300\ubb38\uc790 \ubb38\uc790\uc774\ub2e4. \uc774\ub7ec\ud55c \ud568\uc218\ub4e4\uc744 \ud1b5\ub4e4\uc5b4&nbsp;<em>\ud30c\uc77c \uac80\uc0ac<\/em>&nbsp;\ud568\uc218\ub77c \ud55c\ub2e4. \ud2b9\uc9d5\uc801\uc73c\ub85c \uc774\ub4e4\uc740 '-' \ubb38\uc790\ub85c \uc2dc\uc791\ud55c\ub2e4. \uad6c\uae00 \uac80\uc0c9\uc5d0\uc11c - \ubb38\uc790\ub294 \uac80\uc0c9 \uacb0\uacfc\uc5d0\uc11c \uc81c\uc678\ud560 \ud328\ud134\uc744 \uc758\ubbf8\ud55c\ub2e4. \uadf8\ub798\uc11c \ud30c\uc77c \uac80\uc0ac \ud568\uc218\ub294 \uad6c\uae00 \uac80\uc0c9\uc774 \ud798\ub4e4\ub2e4. \"perl file test\"\uc640 \uac19\uc740 \uc2dd\uc73c\ub85c \uac80\uc0c9\ud574\uc57c \uacb0\uacfc\uac00 \ub098\uc62c \uac83\uc774\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\uc815\uaddc\uc2dd<\/h2><p style=\"font-family: Gulim; font-size: small;\">\uc815\uaddc\uc2dd\uc740 \ud384 \uc678\uc5d0\ub3c4 \ub2e4\ub978 \ub9ce\uc740 \uc5b8\uc5b4\uc640 \ud234\uc5d0 \ub4f1\uc7a5\ud55c\ub2e4. \ud384\uc758 \ud575\uc2ec \uc815\uaddc\uc2dd \uad6c\ubb38\uc740 \ub2e4\ub978 \uac83\ub4e4\uacfc \uae30\ubcf8\uc801\uc73c\ub85c \uac19\uc9c0\ub9cc \uc644\uc804\ud55c \uc815\uaddc\uc2dd \uae30\ub2a5\uc740 \ubb34\uc11c\uc6b8 \uc815\ub3c4\ub85c \ubcf5\uc7a1\ud558\uace0 \uc774\ud574\ud558\uae30 \uc5b4\ub835\ub2e4. \uac00\ub2a5\ud55c \ud55c \uc774\ub7f0 \ubcf5\uc7a1\ud55c \uad6c\ubb38\uc740 \ud53c\ud558\ub77c\uace0 \ub9d0\ud574\uc8fc\uace0 \uc2f6\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">=~ m\/\/<\/code>&nbsp;\uc744 \uc774\uc6a9\ud558\uc5ec \ub9e4\uce58 \uc5f0\uc0b0\uc744 \ud560 \uc218 \uc788\ub2e4. \uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ m\/\/<\/code>\uc740 \uc131\uacf5\ud558\uba74 \ucc38\uc744 \uc2e4\ud328\ud558\uba74 \uac70\uc9d3\uc744 \ubc18\ud658\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $string = \"Hello world\";\nif($string =~ m\/(\\w+)\\s+(\\w+)\/) {\n    print \"success\";\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uad04\ud638\ub294 \ud558\ubd80 \ub9e4\uce58\ub97c \uc218\ud589\ud55c\ub2e4. \ub9e4\uce58\uac00 \uc131\uacf5\ud558\uba74 \ud558\ubd80 \ub9e4\uce58\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">$1, $2, $3, ...<\/code>&nbsp;\ub4f1\uc758 \ub0b4\uc7a5 \ubcc0\uc218\uc5d0 \ub4e4\uc5b4\uac04\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print $1; # \"Hello\"\nprint $2; # \"world\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ m\/\/<\/code>\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">$1, $2, ...<\/code>&nbsp;\ub4f1\ub4f1\uc744 \ub9ac\uc2a4\ud2b8\ub85c \ubc18\ud658\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $string = \"colourless green ideas sleep furiously\";\nmy @matches = $string =~ m\/(\\w+)\\s+((\\w+)\\s+(\\w+))\\s+(\\w+)\\s+(\\w+)\/;\n\nprint join \", \", map { \"'\".$_.\"'\" } @matches;\n# prints \"'colourless', 'green ideas', 'green', 'ideas', 'sleep', 'furiously'\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubc14\uafb8\uae30 \uc5f0\uc0b0\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ s\/\/\/<\/code>\ub97c \uc774\uc6a9\ud558\uc5ec \uc218\ud589\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $string = \"Good morning world\";\n$string =~ s\/world\/Vietnam\/;\nprint $string; # \"Good morning Vietnam\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">$string<\/code>\uc758 \ub0b4\uc6a9\uc774 \uc5b4\ub5bb\uac8c \ubc14\ub00c\uc5c8\ub294\uc9c0 \uc8fc\uc758\ud574\ub77c.&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ \u115fs\/\/\/<\/code>\uc758 \uc67c\ucabd\uc5d0 \uc2a4\uce7c\ub77c \ubcc0\uc218\uac00 \uc788\uc5b4\uc57c \ud55c\ub2e4. \ubb38\uc790\uc5f4 \ub9ac\ud130\ub7f4\uc774 \uc788\uc73c\uba74 \uc5d0\ub7ec\uac00 \ubc1c\uc0dd\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">\/g<\/code>&nbsp;\ud50c\ub798\uadf8\ub294 \"\uadf8\ub8f9 \ub9e4\uce58\"\ub97c \uc758\ubbf8\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc2a4\uce7c\ub77c \ubb38\ub9e5\uc5d0\uc11c\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ m\/\/g<\/code>&nbsp;\uc5f0\uc0b0\uc740 \uc774\uc804 \ub9e4\uce58\ub41c \ub2e4\uc74c \ubd80\ubd84\ubd80\ud130 \ub9e4\uce58\ub97c \uc218\ud589\ud558\uc5ec \uc131\uacf5\ud558\uba74 \ucc38\uc744, \uc2e4\ud328\ud558\uba74 \uac70\uc9d3\uc744 \ubc18\ud658\ud55c\ub2e4. \ub611\uac19\uc774&nbsp;<code style=\"color: rgb(52, 130, 117);\">$1<\/code>&nbsp;\ub4f1\ub4f1\uc73c\ub85c \uac12\uc744 \uc5bb\uc744 \uc218 \uc788\ub2e4. \uc608\ub97c \ub4e4\uc5b4\ubcf4\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $string = \"a tonne of feathers or a tonne of bricks\";\nwhile($string =~ m\/(\\w+)\/g) {\n  print \"'\".$1.\"'\\n\";\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub9ac\uc2a4\ud2b8 \ubb38\ub9e5\uc5d0\uc11c\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ m\/\/g<\/code>\ub294 \ud55c\uaebc\ubc88\uc5d0 \ubaa8\ub4e0 \uc77c\uce58\ub41c \uacb0\uacfc\ub97c \ubc18\ud658\ud55c\ub2e4<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my @matches = $string =~ m\/(\\w+)\/g;\nprint join \", \", map { \"'\".$_.\"'\" } @matches;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">=~ s\/\/\/g<\/code>\ub294 \uc804\uccb4\ub97c \ub4a4\uc838 \ucc3e\uc544\/\ubc14\uafb8\uae30\ub97c \uc218\ud589\ud558\uace0 \uc77c\uce58\ub41c \uc22b\uc790\ub97c \ubc18\ud658\ud55c\ub2e4. \ub2e4\uc74c\uc740 \ubaa8\ub4e0 \ubaa8\uc74c \ubb38\uc790\ub97c \"r\"\ub85c \ubc14\uafb8\ub294 \uc608\uc774\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\"># \/g \uc5c6\uc774 \ud55c\ubc88 \uc2e4\ud589.\n$string =~ s\/[aeiou]\/r\/;\nprint $string; # \"r tonne of feathers or a tonne of bricks\"\n\n# \ub2e4\uc2dc \ub610 \ud55c\ubc88 \uc2e4\ud589.\n$string =~ s\/[aeiou]\/r\/;\nprint $string; # \"r trnne of feathers or a tonne of bricks\"\n\n# \/g\ub97c \uc774\uc6a9\ud558\uc5ec \ub098\uba38\uc9c0 \ubaa8\ub450\ub97c \ubc14\uafbc\ub2e4.\n$string =~ s\/[aeiou]\/r\/g;\nprint $string, \"\\n\"; # \"r trnnr rf frrthrrs rr r trnnr rf brrcks\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">\/i<\/code>&nbsp;\ud50c\ub798\uadf8\ub294 \ub9e4\uce58\uc640 \uce58\ud658\uc744 \ub300\uc18c\ubb38\uc790 \uad6c\ubcc4\uc5c6\uc774 \uc218\ud589\ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">\/x<\/code>&nbsp;\ud50c\ub798\uadf8\ub97c \uc4f0\uba74 \uc815\uaddc\uc2dd\uc5d0 \uacf5\ubc31 \ubb38\uc790(\uc640 \uc904\ub118\uae40)\uc640 \uc8fc\uc11d\uc744 \ud3ec\ud568\ud560 \uc218 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">\"Hello world\" =~ m\/\n  (\\w+) # one or more word characters\n  [ ]   # single literal space, stored inside a character class\n  world # literal \"world\"\n\/x;\n\n# returns true\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h2 style=\"font-family: Gulim;\">\ubaa8\ub4c8\uacfc \ud328\ud0a4\uc9c0<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ud384\uc5d0\uc11c \ubaa8\ub4c8\uacfc \ud328\ud0a4\uc9c0\ub294 \ub2e4\ub978 \uac83\uc774\ub2e4.<\/p>\n<h3 style=\"font-family: Gulim;\">\ubaa8\ub4c8<\/h3><p style=\"font-family: Gulim; font-size: small;\"><em>\ubaa8\ub4c8<\/em>\uc774\ub780&nbsp;<code style=\"color: rgb(52, 130, 117);\">.pm<\/code>&nbsp;\ud655\uc7a5\uc790\ub97c \uac00\uc9c4 \ud30c\uc77c\ub85c \ub2e4\ub978 \ud384 \ud30c\uc77c(\uc2a4\ud06c\ub9bd\ud2b8\uc774\uac70\ub098 \ubaa8\ub4c8)\uc5d0 \ud3ec\ud568\ub418\ub294 \ud30c\uc77c\uc744 \ub9d0\ud55c\ub2e4. \ubaa8\ub4c8\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">.pl<\/code>&nbsp;\ud384 \uc2a4\ud06c\ub9bd\ud2b8\uc640 \uc644\uc804\ud788 \ub611\uac19\uc740 \uad6c\ubb38\uc744 \uac00\uc9c4 \ud14d\uc2a4\ud2b8 \ud30c\uc77c\uc774\ub2e4. \uc608\ub97c \ub4e4\uc5b4&nbsp;<code style=\"color: rgb(52, 130, 117);\">C:\\foo\\bar\\baz\\Demo\\StringUtils.pm<\/code>&nbsp;\ub610\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">\/foo\/bar\/baz\/Demo\/StringUtils.pm<\/code>&nbsp;\uc704\uce58\uc5d0 \uc788\ub294 \ub2e4\uc74c \ud30c\uc77c\uc77c \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nsub zombify {\n    my $word = shift @_;\n    $word =~ s\/[aeiou]\/r\/g;\n    return $word;\n}\n\nreturn 1;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ubaa8\ub4c8\uc740 \ub85c\ub4dc\ub420 \ub54c \uc704\uc5d0\uc11c\ubd80\ud130 \uc544\ub798\ub85c \uc2e4\ud589\ud574\uac00\uae30 \ub54c\ubb38\uc5d0 \ub9e8 \ub9c8\uc9c0\ub9c9\uc5d0 \uc131\uacf5\uc801\uc73c\ub85c \ub85c\ub4dc\ub418\uc5c8\uc74c\uc744 \uc54c\ub9ac\uae30 \uc704\ud574 true \uac12\uc744 \ubc18\ud658\ud574\uc57c \ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud384 \uc778\ud130\ud504\ub9ac\ud130\uac00 \ubaa8\ub4c8\uc744 \ucc3e\uc744 \uc218 \uc788\ub3c4\ub85d \ubaa8\ub4c8\uc744 \ud3ec\ud568\ud558\uace0 \uc788\ub294 \ub514\ub809\ud130\ub9ac\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">PERL5LIB<\/code>&nbsp;\ud658\uacbd\ubcc0\uc218\uc5d0 \ub4e4\uc5b4\uac00 \uc788\uc5b4\uc57c \ud55c\ub2e4. \ubaa8\ub4c8\uc744 \ud3ec\ud568\ud558\uace0 \uc788\ub294 \ub514\ub809\ud130\ub9ac\uc5ec\uc57c\uc9c0, \ubaa8\ub4c8 \ud30c\uc77c\uc758 \ud328\uc2a4(Path)\ub098 \ubaa8\ub4c8\uc758 \ub514\ub809\ud130\ub9ac\uc5ec\uc11c\ub294 \uc548\ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">set PERL5LIB=C:\\foo\\bar\\baz;%PERL5LIB%\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ub610\ub294<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">export PERL5LIB=\/foo\/bar\/baz:$PERL5LIB\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud384 \ubaa8\ub4c8\uc744 \ub9cc\ub4e4\uc5c8\uace0,&nbsp;<code style=\"color: rgb(52, 130, 117);\">perl<\/code>\uc774 \uadf8\uac83\uc744 \uc5b4\ub514\uc11c \ucc3e\uc744 \uc218 \uc788\ub294\uc9c0 \uc548\ub2e4\uba74&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/require.html\">require<\/a>&nbsp;\ud568\uc218\ub97c \uc774\uc6a9\ud558\uc5ec \ud384 \uc2a4\ud06c\ub9bd\ud2b8 \uc548\uc5d0\uc11c \ubaa8\ub4c8\uc744 \ucc3e\uc544 \uc2e4\ud589\uc2dc\ud0ac \uc218 \uc788\ub2e4. \uc608\ub97c \ub4e4\uc5b4&nbsp;<code style=\"color: rgb(52, 130, 117);\">require Demo::StringUtils<\/code>&nbsp;\ub97c \ud638\ucd9c\ud558\uc600\ub2e4\uba74 \ud384 \uc778\ud130\ud504\ub9ac\ud130\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">PERL5LIB<\/code>&nbsp;\ubcc0\uc218\uc5d0 \ub4e4\uc5b4\uc788\ub294 \ub514\ub809\ud130\ub9ac\ub97c \ucc28\ub840\ub85c \uac80\uc0ac\ud558\uc5ec&nbsp;<code style=\"color: rgb(52, 130, 117);\">Demo\/StringUtils.pm<\/code>&nbsp;\ud30c\uc77c\uc774 \uc788\ub294\uc9c0\ub97c \ucc3e\uc544\ub0b8\ub2e4. \ubaa8\ub4c8\uc774 \uc2e4\ud589\ub418\uba74 \uadf8 \uc548\uc5d0 \uc815\uc758\ub41c \uc11c\ube0c\ub8e8\ud2f4\uc740 \uba54\uc778 \uc2a4\ud06c\ub9bd\ud2b8\uc5d0\uc11c \ubc14\ub85c \uc0ac\uc6a9\ud560 \uc218 \uc788\uac8c \ub41c\ub2e4. \uc608\ub97c \ub4e4\uc5b4 \uba54\uc778 \uc2a4\ud06c\ub9bd\ud2b8\uac00&nbsp;<code style=\"color: rgb(52, 130, 117);\">main.pl<\/code>\uc774\uace0 \ub0b4\uc6a9\uc774 \ub2e4\uc74c\uacfc \uac19\ub2e4\uace0 \ud558\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nrequire Demo::StringUtils;\n\nprint zombify(\"i want brains\"); # \"r wrnt brrrns\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">::<\/code>\uc744 \ub514\ub809\ud130\ub9ac \uad6c\ubd84\uc790\ub85c \uc0ac\uc6a9\ud588\uc74c\uc744 \uc8fc\uc758\ud558\ub77c.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30\uc11c \ubb38\uc81c\uac00 \uc0dd\uae34\ub2e4. \ub9cc\uc57d&nbsp;<code style=\"color: rgb(52, 130, 117);\">main.pl<\/code>&nbsp;\uc5d0&nbsp;<code style=\"color: rgb(52, 130, 117);\">require<\/code>&nbsp;\ubb38\uc774 \uc5ec\ub7ec \uac1c \uc788\uace0, \ub610 \uac01\uac01\uc758 \ubaa8\ub4c8\uc5d0\ub3c4 \ub610&nbsp;<code style=\"color: rgb(52, 130, 117);\">require<\/code>\uac00 \uc788\ub2e4\uba74 \uc6d0\ub798\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">zombify()<\/code>&nbsp;\uc11c\ube0c\ub8e8\ud2f4\uc774 \uc5b4\ub514\uc5d0 \uc788\ub294\uc9c0 \ucc3e\uc544\ub0b4\uac00\uae30 \uc810\uc810 \uc5b4\ub824\uc6cc\uc9c8 \uac83\uc774\ub2e4. \uc774 \ubb38\uc81c\ub294 \ud328\ud0a4\uc9c0\ub97c \uc0ac\uc6a9\ud574\uc11c \ud574\uacb0\ud55c\ub2e4.<\/p>\n<h3 style=\"font-family: Gulim;\">\ud328\ud0a4\uc9c0<\/h3><p style=\"font-family: Gulim; font-size: small;\"><em>\ud328\ud0a4\uc9c0<\/em>\ub294 \uc11c\ube0c\ub8e8\ud2f4\uc774 \uc815\uc758\ub420 \uc218 \uc788\ub294 \ub124\uc784\uc2a4\ud398\uc774\uc2a4\uc774\ub2e4. \uc5b4\ub5a4 \uc11c\ube0c\ub8e8\ud2f4\uc774\ub4e0 \ud56d\uc0c1 \ud604\uc7ac\uc758 \ud328\ud0a4\uc9c0 \uc548\uc5d0\uc11c \ubb35\uc2dc\uc801\uc73c\ub85c \uc120\uc5b8\ub41c\ub2e4. \uc2a4\ud06c\ub9bd\ud2b8\uac00 \uc2dc\uc791\ub420 \ub54c\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">main<\/code>&nbsp;\ud328\ud0a4\uc9c0 \uc548\uc774\ub2e4. \ud328\ud0a4\uc9c0\ub97c \ubc14\uafb8\ub294 \uac83\uc740&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/package.html\">package<\/a>&nbsp;\ub0b4\uc7a5 \ud568\uc218\ub97c \uc774\uc6a9\ud558\uba74 \ub41c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nsub subroutine {\n    print \"universe\";\n}\n\npackage Food::Potatoes;\n\n# \uc774\ub984 \ucda9\ub3cc\uc774 \uc5c6\ub2e4:\nsub subroutine {\n    print \"kingedward\";\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">::<\/code>\uc744 \uc774\ub984\uacf5\uac04 \uad6c\ubd84\uc790\ub85c \uc0ac\uc6a9\ud55c \uac83\uc5d0 \uc8fc\uc758\ud574\ub77c.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc11c\ube0c\ub8e8\ud2f4\uc744 \ud638\ucd9c\ud560 \ub54c\ub9c8\ub2e4 \ud604\uc7ac \ud328\ud0a4\uc9c0 \uc548\uc5d0 \uc788\ub294 \uc11c\ube0c\ub8e8\ud2f4\uc744 \ubb35\uc2dc\uc801\uc73c\ub85c \ud638\ucd9c\ud558\ub294 \uac83\uc774\ub2e4. \uadf8\ub7f0\ub370 \ud328\ud0a4\uc9c0\ub97c \uba85\uc2dc\ud560 \uc218\ub3c4 \uc788\ub2e4. \ub9cc\uc57d \uc704\uc758 \uc2a4\ud06c\ub9bd\ud2b8\uc5d0 \uc774\uc5b4\uc11c \uc544\ub798\uc640 \uac19\uc774 \uc9c4\ud589\ud558\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">subroutine();                 # \"kingedward\"\nmain::subroutine();           # \"universe\"\nFood::Potatoes::subroutine(); # \"kingedward\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub798\uc11c \uc704 \uc608\uc81c\uc758 \ub17c\ub9ac\uc801\uc778 \uadc0\uacb0\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">C:\\foo\\bar\\baz\\Demo\\StringUtils.pm<\/code>&nbsp;\ub610\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">\/foo\/bar\/baz\/Demo\/StringUtils.pm<\/code>&nbsp;\uc704\uce58\uc5d0 \uc788\ub294 \ud30c\uc77c\uc740 \uc544\ub798\uc640 \uac19\uc774 \ud558\uace0:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\npackage Demo::StringUtils;\n\nsub zombify {\n    my $word = shift @_;\n    $word =~ s\/[aeiou]\/r\/g;\n    return $word;\n}\n\nreturn 1;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">main.pl<\/code>&nbsp;\ud30c\uc77c\uc740 \uc544\ub798\uc640 \uac19\uc774 \ud558\ub294 \uac83\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nrequire Demo::StringUtils;\n\nprint Demo::StringUtils::zombify(\"i want brains\"); # \"r wrnt brrrns\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc774\uc81c \uc8fc\uc758\ud574\uc11c \ub2e4\uc74c \uc0ac\ud56d\uc744 \uc0b4\ud3b4\ubcf4\uc790.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ud328\ud0a4\uc9c0\uc640 \ubaa8\ub4c8\uc740 \ud384 \ud504\ub85c\uadf8\ub798\ubc0d \uc5b8\uc5b4\uc5d0\uc11c\ub294 \uc644\uc804\ud788 \uc11c\ub85c \uad00\ub828\uc5c6\ub294 \uae30\ub2a5\uc774\ub2e4. \uadf8\ub7f0\ub370 \ub458 \ub2e4 \ub354\ube14 \ucf5c\ub860\uc744 \uad6c\ubd84\uc790\ub85c \uc774\uc6a9\ud558\ub294 \uc810\uc774 \uc0ac\ub78c\ub4e4\uc744 \ud5f7\uac08\ub9ac\uac8c \ub9cc\ub4dc\ub294 \uac83\uc774\ub2e4. \ud558\ub098\uc758 \uc2a4\ud06c\ub9bd\ud2b8 \ub610\ub294 \ubaa8\ub4c8 \uc548\uc5d0\uc11c \uc5ec\ub7ec \ubc88 \ud328\ud0a4\uc9c0\ub97c \ubc14\uafb8\ub294 \uac83\uc774 \uac00\ub2a5\ud558\ub2e4. \ub9c8\ucc2c\uac00\uc9c0\ub85c \ub2e4\ub978 \uc5ec\ub7ec \ud30c\uc77c\uc758 \uc5ec\ub7ec \ub2e4\ub978 \uc704\uce58\uc5d0\uc11c \uac19\uc740 \ud328\ud0a4\uc9c0 \uc120\uc5b8\uc744 \uc0ac\uc6a9\ud558\ub294 \uac83\ub3c4 \uac00\ub2a5\ud558\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">require Foo::Bar<\/code>\ub97c \ud638\ucd9c\ud558\ub294 \uac83\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">package Foo::Bar<\/code>&nbsp;\uc120\uc5b8\uc774 \uc788\ub294 \ud30c\uc77c\uc744 \ucc3e\uac70\ub098 \ub85c\ub4dc\ud558\ub294 \uac83\ub3c4 \uc544\ub2c8\ub2e4. \ub354\ub354\uc6b1&nbsp;<code style=\"color: rgb(52, 130, 117);\">Foo::Bar<\/code>&nbsp;\ub124\uc784\uc2a4\ud398\uc774\uc2a4\uc5d0 \uc788\ub294 \uc11c\ube0c\ub8e8\ud2f4\ub4e4\uc744 \ub85c\ub4dc\ud560 \ud544\uc694\ub3c4 \uc5c6\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">require Foo::Bar<\/code>\ub294 \ub2e8\uc9c0&nbsp;<code style=\"color: rgb(52, 130, 117);\">Foo\/Bar.pm<\/code>&nbsp;\ud30c\uc77c\uc744 \ub85c\ub4dc\ud560 \ubfd0\uc774\ub2e4. \uadf8\ub9ac\uace0 \uadf8 \ud30c\uc77c\uc5d0\ub294 \uc5b4\ub5a4 \ud328\ud0a4\uc9c0 \uc120\uc5b8\ub3c4 \uc788\uc744 \uc218 \uc788\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">package Baz::Qux<\/code>&nbsp;\uac00 \uc788\uc5b4\ub3c4 \ub418\uace0 \uadf8 \ubc16\uc5d0 \uc5b4\ub5a4 \uc774\uc0c1\ud55c \uac8c \uc788\uc5b4\ub3c4 \ub41c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ub9c8\ucc2c\uac00\uc9c0\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">Baz::Qux::processThis()<\/code>&nbsp;\ub77c\ub294 \uc11c\ube0c\ub8e8\ud2f4\uc744 \ud638\ucd9c\ud560 \ub54c \uc774 \uc11c\ube0c\ub8e8\ud2f4\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">Baz\/Qux.pm<\/code>&nbsp;\ud30c\uc77c\uc5d0\uc11c \uc120\uc5b8\ub418\uc5b4 \uc788\uc744 \ud544\uc694\uac00 \uc5c6\ub2e4. \uc774 \uc11c\ube0c\ub8e8\ud2f4\uc740&nbsp;<em>\uadf8\uc57c\ub9d0\ub85c \uc544\ubb34\ub370\uc11c\ub098<\/em>&nbsp;\uc120\uc5b8\ud560 \uc218 \uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc774 \ub450\uac00\uc9c0 \uac1c\ub150\uc744 \ubd84\ub9ac\ud574 \ub193\uc740 \uc810\uc774 \ud384\uc758 \uac00\uc7a5 \ubc14\ubcf4\uac19\uc740 \ud2b9\uc9d5 \uc911 \ud558\ub098\uc774\ub2e4. \uadf8\ub9ac\uace0 \uc774 \ub458\uc744 \uc11c\ub85c \ubd84\ub9ac\ub41c \uac1c\ub150\uc73c\ub85c \ub2e4\ub8f0 \ub54c \ud56d\uc0c1 \ud63c\ub3c8\uc2a4\ub7fd\uace0 \uc0ac\ub78c\ub4e4\uc744 \uc5f4\ubc1b\uac8c \ub9cc\ub4dc\ub294 \ucf54\ub4dc\ub97c \ub0b3\uc558\ub2e4. \ub2e4\ud589\uc2a4\ub7fd\uac8c\ub3c4 \ub300\ubd80\ubd84\uc758 \ud384 \ud504\ub85c\uadf8\ub798\uba38\ub4e4\uc740 \ub2e4\uc74c \ub450 \ubc95\uce59\uc744 \uc900\uc218\ud55c\ub2e4:<\/p>\n<ol style=\"font-family: Gulim; font-size: small;\"><li><strong>\ud384 \uc2a4\ud06c\ub9bd\ud2b8(.pl \ud30c\uc77c)\uc5d0\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">package<\/code>&nbsp;\uc120\uc5b8\uc744 \ub450\uc9c0 \uc54a\ub294\ub2e4.<\/strong><\/li><li><strong>\ud384 \ubaa8\ub4c8(.pm \ud30c\uc77c)\uc5d0\ub294 \uc774\ub984\uacfc \uc704\uce58\uac00 \uc77c\uce58\ud558\ub294 \ud558\ub098\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">package<\/code>&nbsp;\uc120\uc5b8\ub9cc \ub454\ub2e4. \uc989&nbsp;<code style=\"color: rgb(52, 130, 117);\">Demo\/StringUtils.pm<\/code>&nbsp;\ubaa8\ub4c8\uc740 \ubc18\ub4dc\uc2dc&nbsp;<code style=\"color: rgb(52, 130, 117);\">package Demo::StringUtils<\/code>\ub85c \uc2dc\uc791\ud55c\ub2e4.<\/strong><\/li><\/ol><p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub798\uc11c, \uc2e4\uc81c\ub85c\ub294 \ubbff\uc744\ub9cc\ud55c \uc11c\ub4dc \ud30c\ud2f0\uac00 \ub9cc\ub4e0 \"\ud328\ud0a4\uc9c0\"\uc640 \"\ubaa8\ub4c8\"\uc740 \uc11c\ub85c \ud638\ud658\ud574\uc11c \ucc38\uc870\ud560 \uc218 \uc788\ub2e4. \ud558\uc9c0\ub9cc \uc774\uac83\uc744 \ub2f9\uc5f0\uc2dc\ud558\uba74 \uc548\ub41c\ub2e4. \uc5b4\ub5a4 \ubbf8\uce5c \uc778\uac04\uc774 \ub9cc\ub4e0 \ucf54\ub4dc\ub97c \ubcfc \ub0a0\ub3c4 \uc788\uc744 \uc218 \uc788\uae30 \ub54c\ubb38\uc774\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\">\uac1d\uccb4 \uc9c0\ud5a5 \ud384<\/h2><p style=\"font-family: Gulim; font-size: small;\">\ud384\uc740 \uc704\ub300\ud55c \uac1d\uccb4 \uc9c0\ud5a5 \uc5b8\uc5b4\ub294 \uc544\ub2c8\ub2e4. \ud384\uc758 \uac1d\uccb4 \uc9c0\ud5a5 \uae30\ub2a5\ub4e4\uc740 \uc911\uac04\uc5d0 \uc774\uc2dd\ub41c \uac83\ub4e4\uc774\ub2e4. \uadf8\ub798\uc11c \ub2e4\uc74c\uacfc \uac19\uc740 \ud2b9\uc9d5\uc774 \uc788\ub2e4:<\/p>\n<ul style=\"font-family: Gulim; font-size: small;\"><li><p><em>\uac1d\uccb4(object)<\/em>\ub294 \ub2e8\uc21c\ud55c \ucc38\uc870\uc774\ub2e4. \ub2e4\ub9cc \ucc38\uc870\ud558\uace0 \uc788\ub294 \uac83\uc774 \uc5b4\ub5a4 \ud074\ub798\uc2a4(class)\uc5d0 \uc18d\ud558\ub294\uc9c0 \uc54c \uc218 \uc788\ub2e4\ub294 \uc810\uc774 \uc77c\ubc18 \ucc38\uc870\uc640 \uad6c\ubcc4\ub418\ub294 \uc810\uc774\ub2e4. \ucc38\uc870\ud558\uace0 \uc788\ub294 \uac1c\uccb4\uac00 \uc5b4\ub290 \ud074\ub798\uc2a4\uc5d0 \uc18d\ud560\uc9c0 \uc815\ud558\uae30 \uc704\ud574&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/bless.html\">bless<\/a>\ub97c \uc0ac\uc6a9\ud55c\ub2e4. \ucc38\uc870\uac00 \ucc38\uc870\ud558\uace0 \uc788\ub294 \uac83\uc774 \uc5b4\ub5a4 \ud074\ub798\uc2a4\uc778\uc9c0 \uc54c\uc544\ub0b4\uae30 \uc704\ud574&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/ref.html\">ref<\/a>\ub97c \uc0ac\uc6a9\ud55c\ub2e4.<\/p>\n<\/li><li><p><em>\uba54\uc11c\ub4dc(method)<\/em>\ub294 \uac1d\uccb4(\ub610\ub294 \ud074\ub798\uc2a4 \uba54\uc11c\ub4dc\uc778 \uacbd\uc6b0 \ud328\ud0a4\uc9c0 \uc774\ub984)\ub97c \uccab\ubc88\uc9f8 \uc778\uc790\ub85c \uac16\ub294 \uc11c\ube0c\ub8e8\ud2f4\uc774\ub2e4. \uac1d\uccb4\uc758 \uba54\uc11c\ub4dc\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">$obj-&gt;method();<\/code>&nbsp;\uc2dd\uc73c\ub85c \ud638\ucd9c\ud55c\ub2e4. \ud074\ub798\uc2a4 \uba54\uc11c\ub4dc\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">Package::Name-&gt;method()<\/code>&nbsp;\uc2dd\uc774\ub2e4.<\/p>\n<\/li><li><p><em>\ud074\ub798\uc2a4(class)<\/em>\ub294 \uba54\uc11c\ub4dc\ub97c \ud3ec\ud568\ud558\uac8c \ub41c \ud328\ud0a4\uc9c0\uc774\ub2e4.<\/p>\n<\/li><\/ul><p style=\"font-family: Gulim; font-size: small;\">\uc608\uc81c\ub97c \ubcf4\uba74 \ud655\uc2e4\ud788 \uc54c \uc218 \uc788\ub2e4. \uc608\uc81c \ubaa8\ub4c8&nbsp;<code style=\"color: rgb(52, 130, 117);\">Animal.pm<\/code>&nbsp;\uc740 \ub2e4\uc74c\uacfc \uac19\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">Animal<\/code>&nbsp;\ud074\ub798\uc2a4\ub97c \ud3ec\ud568\ud558\uace0 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\npackage Animal;\n\nsub eat {\n    # First argument is always the object to act upon.\n    my $self = shift @_;\n\n    foreach my $food ( @_ ) {\n        if($self-&gt;can_eat($food)) {\n            print \"Eating \", $food;\n        } else {\n            print \"Can't eat \", $food;\n        }\n    }\n}\n\n# Animal\uc740 \ubb34\uc5c7\uc774\ub4e0\uc9c0 \uba39\uc744(eat) \uc218 \uc788\ub2e4\uace0 \ud558\uc790.\nsub can_eat {\n    return 1;\n}\n\nreturn 1;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub9ac\uace0 \uc774 \ud074\ub798\uc2a4\ub294 \ub2e4\uc74c\uacfc \uac19\uc774 \uc0ac\uc6a9\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">require Animal;\n\nmy $animal = {\n    \"legs\"   =&gt; 4,\n    \"colour\" =&gt; \"brown\",\n};                       # $animal \uc740 \uadf8\ub0e5 \ud574\uc2dc \ucc38\uc870\nprint ref $animal;       # \"HASH\"\nbless $animal, \"Animal\"; # \uc774\uc81c \"Animal\" \ud074\ub798\uc2a4\uc758 \uac1d\uccb4\uac00 \ub418\uc5c8\ub2e4\nprint ref $animal;       # \"Animal\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc8fc\uc758: \ubb38\uc790 \uadf8\ub300\ub85c \uc5b4\ub5a4 \ucc38\uc870\ub4e0\uc9c0 \uc544\ubb34 \ud074\ub798\uc2a4\ub85c\ub3c4&nbsp;<em>bless<\/em>&nbsp;\ub420 \uc218 \uc788\ub2e4. (1) \ucc38\uc870\ub41c \uac1d\uccb4\uac00 \uc774 \ud074\ub798\uc2a4\uc758 \uc778\uc2a4\ud134\uc2a4\ub85c \uc2e4\uc81c \uc0ac\uc6a9\ub420 \uc218 \uc788\uace0 (2) \ud574\ub2f9 \ud074\ub798\uc2a4\uac00 \uc874\uc7ac\ud558\uace0 \ub85c\ub4dc\ub418\uac8c \ud558\ub294 \uac83\uc740 \ub2f9\uc2e0\uc5d0\uac8c \ub2ec\ub824\uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc774 \uac1d\uccb4\ub294 \uc5ec\uc804\ud788 \uc6d0\ub798\uc758 \ud574\uc2dc\ucc98\ub7fc \uc0ac\uc6a9\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print \"Animal has \", $animal-&gt;{\"legs\"}, \" leg(s)\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud558\uc9c0\ub9cc \uc774\uc81c&nbsp;<code style=\"color: rgb(52, 130, 117);\">-&gt;<\/code>&nbsp;\uc5f0\uc0b0\uc790\ub97c \uc0ac\uc6a9\ud558\uc5ec \uac1d\uccb4\uc758 \uba54\uc11c\ub4dc\ub97c \ud638\ucd9c\ud560 \uc218 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">$animal-&gt;eat(\"insects\", \"curry\", \"eucalyptus\");\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc774 \uba54\uc11c\ub4dc \ud638\ucd9c\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">Animal::eat($animal, \"insects\", \"curry\", \"eucalyptus\")<\/code>\uc640 \uac19\ub2e4.<\/p>\n<h3 style=\"font-family: Gulim;\">\uc0dd\uc131\uc790(constructor)<\/h3><p style=\"font-family: Gulim; font-size: small;\">\uc0dd\uc131\uc790\ub294 \uc0c8 \uac1d\uccb4\ub97c \ubc18\ud658\ud558\ub294 \ud074\ub798\uc2a4 \uba54\uc11c\ub4dc\uc774\ub2e4. \uc6d0\ud558\ub294\ub300\ub85c \uc120\uc5b8\ud558\uba74 \ub41c\ub2e4. \uc774\ub984\ub3c4 \uc5b4\ub5a4 \uc774\ub984\uc774\ub4e0 \uc0ac\uc6a9\ud560 \uc218 \uc788\ub2e4. \ud074\ub798\uc2a4 \uba54\uc11c\ub4dc\ub294 \uccab\ubc88\uc9f8 \uc778\uc790\uac00 \uac1d\uccb4\uac00 \uc544\ub2c8\uace0 \ud074\ub798\uc2a4 \uc774\ub984\uc774\ub2e4. \uc608\uc81c\uc758 \uacbd\uc6b0\ub294 \"Animal\"\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\npackage Animal;\n\nsub new {\n    my $class = shift @_;\n    return bless { \"legs\" =&gt; 4, \"colour\" =&gt; \"brown\" }, $class;\n}\n\n# ...etc.\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub7ec\uba74 \ub2e4\uc74c\uacfc \uac19\uc774 \uc0ac\uc6a9\ud560 \uc218 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">my $animal = Animal-&gt;new();\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h3 style=\"font-family: Gulim;\">\uc0c1\uc18d(inheritance)<\/h3><p style=\"font-family: Gulim; font-size: small;\">\ubd80\ubaa8 \ud074\ub798\uc2a4\ub85c\ubd80\ud130 \uc0c1\uc18d\ud558\ub824\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">use parent<\/code>&nbsp;\uad6c\ubb38\uc744 \uc0ac\uc6a9\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">Animal<\/code>&nbsp;\ud074\ub798\uc2a4\ub97c \uc0c1\uc18d\ud558\uc5ec&nbsp;<code style=\"color: rgb(52, 130, 117);\">Koala.pm<\/code>\uc5d0 \uc704\uce58\ud55c&nbsp;<code style=\"color: rgb(52, 130, 117);\">Koala<\/code>&nbsp;\ud074\ub798\uc2a4\ub97c \ub9cc\ub4dc\ub294 \uacbd\uc6b0\ub97c \ubcf4\uc790:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\npackage Koala;\n\n# Animal\uc744 \uc0c1\uc18d\nuse parent (\"Animal\");\n\n# \uba54\uc11c\ub4dc \uc624\ubc84\ub77c\uc774\ub4dc\nsub can_eat {\n    my $self = shift @_; # \uc774 \ubcc0\uc218\ub97c \uc0ac\uc6a9\ud558\uc9c4 \uc54a\uc9c0\ub9cc \ubc1b\uc544 \ub193\ub294\ub2e4\n    my $food = shift @_;\n    return $food eq \"eucalyptus\";\n}\n\nreturn 1;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc0ac\uc6a9\ud558\ub294 \ucf54\ub4dc\ub294 \ub2e4\uc74c\uacfc \uac19\uc744 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nrequire Koala;\n\nmy $koala = Koala-&gt;new();\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc5ec\uae30 \ub9c8\uc9c0\ub9c9 \uba54\uc11c\ub4dc \ud638\ucd9c\uc5d0\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">Koala::eat($koala, \"insects\", \"curry\", \"eucalyptus\")<\/code>\ub97c \ud638\ucd9c\ud558\ub824 \ud55c\ub2e4. \ud558\uc9c0\ub9cc&nbsp;<code style=\"color: rgb(52, 130, 117);\">Koala<\/code>&nbsp;\ud328\ud0a4\uc9c0\uc5d0\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">eat()<\/code>&nbsp;\uc11c\ube0c\ub8e8\ud2f4\uc774 \uc5c6\ub2e4. \uadf8\ub7ec\ub098&nbsp;<code style=\"color: rgb(52, 130, 117);\">Koala<\/code>\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">Animal<\/code>\uc744 \ubd80\ubaa8 \ud074\ub798\uc2a4\ub85c \uac00\uc84c\uae30 \ub54c\ubb38\uc5d0 \ud384 \uc778\ud130\ud504\ub9ac\ud130\ub294 \ub300\uc2e0&nbsp;<code style=\"color: rgb(52, 130, 117);\">Animal::eat($koala, \"insects\", \"curry\", \"eucalyptus\")<\/code>&nbsp;\ub97c \ud638\ucd9c\ud558\uace0, \uc774\ub294 \uc791\ub3d9\ud55c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">Koala.pm<\/code>\uc5d0 \uc758\ud574&nbsp;<code style=\"color: rgb(52, 130, 117);\">Animal<\/code>&nbsp;\ud074\ub798\uc2a4\uac00 \uc5b4\ub5bb\uac8c \uc790\ub3d9\uc801\uc73c\ub85c \ub85c\ub4dc\ub418\ub294\uc9c0\ub3c4 \uc8fc\uc758\ud574\ub77c.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">use parent<\/code>\ub294 \ubd80\ubaa8 \ud074\ub798\uc2a4\uc758 \ub9ac\uc2a4\ud2b8\ub97c \ubc1b\uc744 \uc218 \uc788\uc73c\ubbc0\ub85c, \ud384\uc5d0\uc11c\ub294 \uc7a5\uc810\uacfc \ub354\ubd88\uc5b4 \uace8\uce58\uc544\ud508 \uc810\ub3c4 \ud568\uaed8 \uac00\uc9c0\uace0 \uc788\ub294 \ub2e4\uc911 \uc0c1\uc18d\uc744 \ud560 \uc218 \uc788\ub2e4.<\/p>\n<h2 style=\"font-family: Gulim;\"><code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed<\/h2><p style=\"font-family: Gulim; font-size: small;\"><a href=\"http:\/\/perldoc.perl.org\/functions\/BEGIN.html\">BEGIN<\/a>&nbsp;\ube14\ub7ed\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">perl<\/code>\uc774 \uc774 \ube14\ub7ed\uc758 \ud30c\uc2f1\uc774 \ub05d\ub098\uba74 \ubc14\ub85c \uc2e4\ud589\ub41c\ub2e4. \uc774\uac83\uc740 \uc2ec\uc9c0\uc5b4 \ud30c\uc77c\uc758 \ub098\uba38\uc9c0 \ubd80\ubd84\uc758 \ud30c\uc2f1\uc774 \ucc44\ub05d\ub098\uc9c0 \uc54a\uc558\ub354\ub77c\ub3c4 \uc2e4\ud589\ub41c\ub2e4. \uc2e4\ud589 \uc2dc\uac04\uc5d0\ub294 \ubb34\uc2dc\ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nprint \"This gets printed second\";\n\nBEGIN {\n    print \"This gets printed first\";\n}\n\nprint \"This gets printed third\";\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc740 \ud56d\uc0c1 \uc81c\uc77c \uba3c\uc800 \uc2e4\ud589\ub41c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc774 \uc5ec\ub7ec\uac1c \uc788\ub2e4\uba74(\uadf8\ub7ec\uc9c0 \ub9d0\uae30\ub97c \ubc14\ub77c\uc9c0\ub9cc), \ucef4\ud30c\uc77c\ub7ec\uac00 \uc704\ubd80\ud130 \uc544\ub798\ub85c \ub9cc\ub098\ub294 \uc21c\uc11c\ub300\ub85c \uc2e4\ud589\ub41c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc740 \uc2a4\ud06c\ub9bd\ud2b8 \uc911\uac04\uc5d0 \uc704\uce58\ud558\ub354\ub77c\ub3c4 \uc2ec\uc9c0\uc5b4 \uac00\uc7a5 \ubc11\uc5d0 \uc788\ub354\ub77c\ub3c4 \ud56d\uc0c1 \uc81c\uc77c \uba3c\uc800 \uc2e4\ud589\ub41c\ub2e4(\uc774\uac83\ub3c4 \ud558\uc9c0 \ub9d0\ub77c).&nbsp;<strong>\ucf54\ub4dc\uc758 \uc790\uc5f0\uc2a4\ub7ec\uc6b4 \uc21c\uc11c\ub97c \ubcf5\uc7a1\ud558\uac8c \ub9cc\ub4e4\uc9c0 \ub9c8\ub77c.&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc740 \ub9e8 \ucc98\uc74c\uc5d0 \ub46c\ub77c!<\/strong><\/p>\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc740 \uc774 \ube14\ub7ed\uc758 \ud30c\uc2f1\uc774 \ub05d\ub098\ub294 \uc989\uc2dc \uc2e4\ud589\ub41c\ub2e4. \uc774\uac83\uc774 \ub05d\ub098\uace0&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed \ub05d\ubd80\ud130 \ud30c\uc2f1\uc774 \uc7ac\uac1c\ub41c\ub2e4. \uc804\uccb4 \ud30c\uc77c \ub610\ub294 \ubaa8\ub4c8\uc774 \ud55c\ubc88 \ud30c\uc2f1\ub418\uace0 \ub098\uc11c\uc57c&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed \ubc14\uae65\uc758 \ucf54\ub4dc\uac00 \uc2e4\ud589\ub41c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\nprint \"This 'print' statement gets parsed successfully but never executed\";\n\nBEGIN {\n    print \"This gets printed first\";\n}\n\nprint \"This, also, is parsed successfully but never executed\";\n\n...because e4h8v3oitv8h4o8gch3o84c3 there is a huge parsing error down here.\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ucef4\ud30c\uc77c \uacfc\uc815 \uc911\uc5d0 \uc2e4\ud589\ub418\ub294 \uac83\uc774\ubbc0\ub85c, \uc870\uac74\ubb38 \uc548\uc5d0&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc744 \ub450\uc5c8\ub2e4\ud558\ub354\ub77c\ub3c4 \uc5ed\uc2dc \uac00\uc7a5 \uba3c\uc800 \uc2e4\ud589\ub41c\ub2e4. \uc2ec\uc9c0\uc5b4 \uc870\uac74\uc774 \uac70\uc9d3\uc774\ub77c\ub3c4 \uc2e4\ud589\ub41c\ub2e4. \uc870\uac74\uc740 \ud3c9\uac00\ub418\uc9c0\ub3c4 \uc54a\uace0 \uc2e4\ud589\ub418\uba70 \uc2e4\uc81c\ub85c \uc870\uac74\uc740 \uc804\ud600 \uc2e4\ud589\ub418\uc9c0 \uc54a\uc744 \uc218\ub3c4 \uc788\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">if(0) {\n    BEGIN {\n        print \"This will definitely get printed\";\n    }\n    print \"Even though this won't\";\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><strong>\uc870\uac74\ubb38 \uc548\uc5d0&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc744 \ub450\uc9c0 \ub9c8\ub77c!<\/strong>&nbsp;\ucef4\ud30c\uc77c \uacfc\uc815 \uc911\uc5d0 \uc870\uac74\uc5d0 \ub530\ub77c \ubb34\uc5c7\uc778\uac00\ub97c \ud558\uace0 \uc2f6\ub2e4\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed \uc548\uc5d0 \uc870\uac74\ubb38\uc744 \ub450\uc5b4\ub77c:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">BEGIN {\n    if($condition) {\n        # etc.\n    }\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<h2 style=\"font-family: Gulim;\"><code style=\"color: rgb(52, 130, 117);\">use<\/code><\/h2><p style=\"font-family: Gulim; font-size: small;\">\uc774\uc81c \ud328\ud0a4\uc9c0, \ubaa8\ub4c8, \ud074\ub798\uc2a4 \uba54\uc11c\ub4dc\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc744 \uc774\ud574\ud588\uc73c\ubbc0\ub85c, \uad49\uc7a5\ud788 \uc790\uc8fc \ubcf4\uac8c \ub418\ub294&nbsp;<a href=\"http:\/\/perldoc.perl.org\/functions\/use.html\">use<\/a>&nbsp;\ud568\uc218\ub97c \uc0b4\ud3b4\ubcf4\uc790.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ub2e4\uc74c\uc758 \uc138 \ubb38\uc7a5\uc740:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use Caterpillar (\"crawl\", \"pupate\");\nuse Caterpillar ();\nuse Caterpillar;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uac01\uac01 \uc544\ub798\uc640 \ub3d9\uc77c\ud558\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">BEGIN {\n    require Caterpillar;\n    Caterpillar-&gt;import(\"crawl\", \"pupate\");\n}\nBEGIN {\n    require Caterpillar;\n}\nBEGIN {\n    require Caterpillar;\n    Caterpillar-&gt;import();\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<ul style=\"font-family: Gulim; font-size: small;\"><li>\uc608\uc81c\uc758 \uc21c\uc11c\uac00 \uc798\ubabb\ub41c \uac8c \uc544\ub2c8\ub2e4. \ud384\uc774 \uba4d\uccad\ud55c \uac83 \ubfd0\uc774\ub2e4.<\/li><li><code style=\"color: rgb(52, 130, 117);\">use<\/code>&nbsp;\ud638\ucd9c\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">BEGIN<\/code>&nbsp;\ube14\ub7ed\uc774 \ubcc0\uc7a5\ud55c \uac83\uc774\ub2e4. \uac19\uc740 \uacbd\uace0\uac00 \uc801\uc6a9\ub41c\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">use<\/code>&nbsp;\ubb38\uc740 \uc5b8\uc81c\ub098 \ud30c\uc77c \uc717\ubd80\ubd84\uc5d0 \ub450\uace0&nbsp;<strong>\uacb0\ucf54 \uc870\uac74\ubb38\uc548\uc5d0 \ub450\uc9c0 \ub9c8\ub77c<\/strong>.<\/li><li><code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ub294 \ud384\uc758 \ub0b4\uc7a5 \ud568\uc218\uac00 \uc544\ub2c8\ub2e4. \uc774\uac83\uc740&nbsp;<strong>\uc0ac\uc6a9\uc790 \uc815\uc758 \ud074\ub798\uc2a4 \uba54\uc11c\ub4dc\uc774\ub2e4<\/strong>.&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar<\/code>&nbsp;\ud328\ud0a4\uc9c0\uc758 \ud504\ub85c\uadf8\ub798\uba38\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ub97c \uc815\uc758\ud558\uac70\ub098 \ub610\ub294 \uc0c1\uc18d\ud574\uc57c\ub9cc \ud55c\ub2e4. \uadf8\ub9ac\uace0 \uc774 \uba54\uc11c\ub4dc\ub294 \uc774\ub860\uc801\uc73c\ub85c \uc5b4\ub5a0\ud55c \uac83\ub3c4 \uc778\uc790\ub85c \ubc1b\uc744 \uc218 \uc788\uc73c\uba70 \uadf8 \uc778\uc790\ub85c \uc5b4\ub5a0\ud55c \uac83\ub3c4 \ud560 \uc218 \uc788\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">use Caterpillar<\/code>&nbsp;\ub294 \ubb34\uc5c7\uc774\ub4e0 \ud560 \uc218 \uc788\ub2e4. \uc815\ud655\ud788 \ubb34\uc2a8 \uc77c\uc774 \uc77c\uc5b4\ub0a0\uc9c0 \uc54c\ub824\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar.pm<\/code>\uc758 \ubb38\uc11c\ub97c \ucc38\uc870\ud574\uc57c \ud55c\ub2e4.<\/li><li><code style=\"color: rgb(52, 130, 117);\">require Caterpillar<\/code>\ub294&nbsp;<strong>\ubaa8\ub4c8<\/strong>&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar.pm<\/code>\uc744 \ub85c\ub4dc\ud558\uace0,&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar-&gt;import()<\/code>\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar<\/code>&nbsp;<strong>\ud328\ud0a4\uc9c0<\/strong>\uc5d0 \uc120\uc5b8\ub418\uc5b4 \uc788\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>&nbsp;\uc11c\ube0c\ub8e8\ud2f4\uc744 \ud638\ucd9c\ud55c\ub2e4\ub294 \uc810\uc744 \uc720\uc758\uae4a\uac8c \ubd10\ub77c. \ubaa8\ub4c8\uacfc \ud328\ud0a4\uc9c0\uac00 \uc77c\uce58\ud558\uae30\ub97c \uae30\uc6d0\ud558\uc790!<\/li><\/ul><h2 style=\"font-family: Gulim;\">Exporter<\/h2><p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">import()<\/code>&nbsp;\uba54\uc11c\ub4dc\ub97c \uc815\uc758\ud558\ub294 \ubc29\ubc95\uc73c\ub85c&nbsp;<a href=\"http:\/\/perldoc.perl.org\/Exporter.html\">Exporter<\/a>&nbsp;\ubaa8\ub4c8\ub85c\ubd80\ud130 \uc774 \uba54\uc11c\ub4dc\ub97c \uc0c1\uc18d\ud558\ub294 \ubc29\ubc95\uc774 \uac00\uc7a5 \ud754\ud558\uac8c \uc4f0\uc778\ub2e4. Exporter\ub294 \ud384\uc758 \ud575\uc2ec \ubaa8\ub4c8(core module)\uc5d0 \uc18d\ud558\uba70 \uc0ac\uc2e4\uc0c1 \ud384 \ud504\ub85c\uadf8\ub798\ubc0d \uc5b8\uc5b4\uc758 \ud575\uc2ec \ud2b9\uc9d5 \uc911 \ud558\ub098\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">Exporter<\/code>\uc758&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>&nbsp;\uad6c\ud604\uc5d0\uc11c\ub294 \uc778\uc790 \ubaa9\ub85d\uc740 \uc11c\ube0c\ub8e8\ud2f4 \uc774\ub984 \ubaa9\ub85d\uc73c\ub85c \ud574\uc11d\ub41c\ub2e4. \uc11c\ube0c\ub8e8\ud2f4\uc774&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ub418\uba74 \uadf8 \uc790\uc2e0\uc758 \ud328\ud0a4\uc9c0\uc5d0\uc11c\ucc98\ub7fc \ud604\uc7ac \ud328\ud0a4\uc9c0\uc5d0\uc11c \uc0ac\uc6a9\ud560 \uc218 \uc788\uac8c \ub41c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc608\uc81c\ub97c \ubcf4\uba74 \uc774\ud574\ud558\uae30 \uc27d\ub2e4.&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar.pm<\/code>\uc740 \ub2e4\uc74c\uacfc \uac19\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\npackage Caterpillar;\n\n# Inherit from Exporter\nuse parent (\"Exporter\");\n\nsub crawl  { print \"inch inch\";   }\nsub eat    { print \"chomp chomp\"; }\nsub pupate { print \"bloop bloop\"; }\n\nour @EXPORT_OK = (\"crawl\", \"eat\");\n\nreturn 1;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud328\ud0a4\uc9c0 \ubcc0\uc218\uc778&nbsp;<code style=\"color: rgb(52, 130, 117);\">@EXPORT_OK<\/code>\uc5d0\ub294 \uc11c\ube0c\ub8e8\ud2f4 \uc774\ub984 \ubaa9\ub85d\uc774 \ub4e4\uc5b4\uc788\uc5b4\uc57c \ud55c\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\ub2e4\ub978 \ucf54\ub4dc\uc5d0\uc11c \uc774 \uc11c\ube0c\ub8e8\ud2f4\uc744 \uc774\ub984\uc73c\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ud55c\ub2e4. \ubcf4\ud1b5&nbsp;<code style=\"color: rgb(52, 130, 117);\">use<\/code>&nbsp;\uad6c\ubb38\uc744 \uc774\uc6a9\ud55c\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\nuse Caterpillar (\"crawl\");\n\ncrawl(); # \"inch inch\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uc774 \uacbd\uc6b0, \ud604\uc7ac \ud328\ud0a4\uc9c0\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">main<\/code>\uc774\ub2e4. \ub530\ub77c\uc11c&nbsp;<code style=\"color: rgb(52, 130, 117);\">craw()<\/code>&nbsp;\ud638\ucd9c\uc740 \uc2e4\uc81c\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">main::call()<\/code>&nbsp;\ud638\ucd9c\uc774\ub2e4. \uadf8\ub9ac\uace0 \uc774\uac83\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\uc5d0 \uc758\ud574&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar::crawl()<\/code>\uc5d0 \ub9e4\ud551\ub418\uc5b4\uc788\ub2e4.<\/p>\n<p style=\"font-family: Gulim; font-size: small;\">\uc8fc\uc758\uc810:&nbsp;<code style=\"color: rgb(52, 130, 117);\">@EXPORT_OK<\/code>\uc758 \ub0b4\uc6a9\uacfc \uc0c1\uad00\uc5c6\uc774 \ubaa8\ub4e0 \uba54\uc11c\ub4dc\ub294 \ud328\ud0a4\uc9c0 \uba85\uae4c\uc9c0 \ubd99\uc5ec\uc11c \ud638\ucd9c\ud558\uba74 \ud638\ucd9c\ud560 \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\nuse Caterpillar (); # no subroutines named, no import() call made\n\n# and yet...\nCaterpillar::crawl();  # \"inch inch\"\nCaterpillar::eat();    # \"chomp chomp\"\nCaterpillar::pupate(); # \"bloop bloop\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\ud384\uc5d0\ub294 private \uba54\uc11c\ub4dc\uac00 \uc5c6\ub2e4. \uad00\ub840\uc801\uc73c\ub85c \ub0b4\ubd80\uc801\uc778 \ubaa9\uc801\uc73c\ub85c\ub9cc \uc4f0\uc77c \uba54\uc11c\ub4dc\uc5d0\ub294 \uc774\ub984\uc744 \"_\" \ubb38\uc790 \ud558\ub098 \ub610\ub294 \ub450\uac1c\ub85c \uc2dc\uc791\ud55c\ub2e4.<\/p>\n<h3 style=\"font-family: Gulim;\"><code style=\"color: rgb(52, 130, 117);\">@EXPORT<\/code><\/h3><p style=\"font-family: Gulim; font-size: small;\">Exporter \ubaa8\ub4c8\uc5d0\ub294 \ub610\ud55c&nbsp;<code style=\"color: rgb(52, 130, 117);\">@EXPORT<\/code>\ub77c\ub294 \ud328\ud0a4\uc9c0 \ubcc0\uc218\uac00 \uc788\ub2e4. \uc774 \ubcc0\uc218\uc5d0\ub3c4 \ub610\ud55c \uc11c\ube0c\ub8e8\ud2f4 \uc774\ub984\ub4e4\uc744 \uc800\uc7a5\ud55c\ub2e4.<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\n\npackage Caterpillar;\n\n# Inherit from Exporter\nuse parent (\"Exporter\");\n\nsub crawl  { print \"inch inch\";   }\nsub eat    { print \"chomp chomp\"; }\nsub pupate { print \"bloop bloop\"; }\n\nour @EXPORT = (\"crawl\", \"eat\", \"pupate\");\n\nreturn 1;\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\"><code style=\"color: rgb(52, 130, 117);\">@EXPORT<\/code>&nbsp;\uc548\uc5d0 \uc774\ub984\uc774 \uc788\ub294 \uc11c\ube0c\ub8e8\ud2f4\ub4e4\uc740&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\uac00 \uc778\uc790\uc5c6\uc774 \ud638\ucd9c\ub418\uba74 export\ub41c\ub2e4. \uc774\uc81c \ub2e4\uc74c\uc744 \ubcf4\uba74:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use strict;\nuse warnings;\nuse Caterpillar; # calls import() with no arguments\n\ncrawl();  # \"inch inch\"\neat();    # \"chomp chomp\"\npupate(); # \"bloop bloop\"\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p style=\"font-family: Gulim; font-size: small;\">\uadf8\ub807\uc9c0\ub9cc \uc5ec\uae30\uc11c \uc6b0\ub9ac\ub294 \ub2e4\uc2dc&nbsp;<code style=\"color: rgb(52, 130, 117);\">crawl()<\/code>\uc774 \uc5b4\ub514\uc11c \uc815\uc758\ub418\uc5c8\ub294\uc9c0 \ub2e4\ub978 \ub2e8\uc11c\uac00 \uc5c6\uc774\ub294 \uc27d\uac8c \uc54c \uc218 \uc5c6\ub294 \uc9c0\uc810\uc5d0 \ub418\ub3cc\uc544\uc654\ub2e4. The moral of this story is twofold:<\/p>\n<ol style=\"font-family: Gulim; font-size: small;\"><li><p>Exporter\ub97c \uc774\uc6a9\ud558\ub294 \ubaa8\ub4c8\uc744 \ub9cc\ub4e4 \ub54c, \uc11c\ube0c\ub8e8\ud2f4\ub4e4\uc744&nbsp;<code style=\"color: rgb(52, 130, 117);\">@EXPORT<\/code>\ub97c \uc0ac\uc6a9\ud558\uc5ec \uae30\ubcf8\uc801\uc73c\ub85c export\ud558\uc9c0 \uc54a\ub294\ub2e4. \ud56d\uc0c1 \uc0ac\uc6a9\uc790\uac00 \uc11c\ube0c\ub8e8\ud2f4\uc744 \uc9c1\uc811 \uc77c\uc77c\ud788 \uc9c0\uc815\ud558\uc5ec \ud638\ucd9c\ud558\uac70\ub098 \ub610\ub294 \uba85\uc2dc\uc801\uc73c\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ud558\uac8c \ud55c\ub2e4(\uc989&nbsp;<code style=\"color: rgb(52, 130, 117);\">use Caterpillar (\"crawl\")<\/code>&nbsp;\uc2dd\uc73c\ub85c \uc0ac\uc6a9\ud558\uac8c \ud55c\ub2e4. \uadf8\ub7fc\uc73c\ub85c\uc368&nbsp;<code style=\"color: rgb(52, 130, 117);\">crawl()<\/code>\uc758 \uc815\uc758\ub97c \ubcf4\ub824\uba74&nbsp;<code style=\"color: rgb(52, 130, 117);\">Caterpillar.pm<\/code>\uc744 \ucc3e\uc544\ubd10\uc57c \ud55c\ub2e4\ub294 \uac78 \uc27d\uac8c \uc54c \uc218 \uc788\ub2e4.).<\/p>\n<\/li><li><p>Exporter\ub97c \uc774\uc6a9\ud558\ub294 \ubaa8\ub4c8\uc744 \uc0ac\uc6a9\ud560 \ub54c\ub294 \ud56d\uc0c1&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ud558\uace0 \ud558\ub294 \uc11c\ube0c\ub8e8\ud2f4\ub4e4\uc744 \uba85\uc2dc\uc801\uc73c\ub85c \uc774\ub984\uc744 \uc774\uc6a9\ud558\uc5ec&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ud55c\ub2e4. \uc5b4\ub5a4 \uc11c\ube0c\ub8e8\ud2f4\ub3c4&nbsp;<code style=\"color: rgb(52, 130, 117);\">import()<\/code>\ud558\uc9c0 \uc54a\uace0 \uc77c\uc77c\uc774 \ud328\ud0a4\uc9c0\uba85\uc744 \uc9c0\uc815\ud558\uc5ec \ud638\ucd9c\ud558\uace0\uc790 \ud55c\ub2e4\uba74, \uba85\uc2dc\uc801\uc73c\ub85c \ube48 \ubaa9\ub85d\uc744 \ub118\uaca8\uc900\ub2e4: \uc989&nbsp;<code style=\"color: rgb(52, 130, 117);\">use Caterpillar ()<\/code>&nbsp;\uc2dd\uc73c\ub85c \uc4f4\ub2e4.<\/p>\n<\/li><\/ol><h2 style=\"font-family: Gulim;\">\uadf8\ubc16\uc758 \uac83\ub4e4<\/h2><ul style=\"font-family: Gulim; font-size: small;\"><li><p>\ud575\uc2ec \ubaa8\ub4c8\uc778&nbsp;<a href=\"http:\/\/perldoc.perl.org\/Data\/Dumper.html\">Data::Dumper<\/a>\ub294 \uc784\uc758\uc758 \uc2a4\uce7c\ub77c \ubcc0\uc218\ub97c \ucd9c\ub825\ud560 \ub54c \uc4f8 \uc218 \uc788\ub2e4. \ud544\uc218\uc801\uc778 \ub514\ubc84\uadf8 \ub3c4\uad6c\uc774\ub2e4.<\/p>\n<\/li><li><p>\ubc30\uc5f4\uc744 \uc120\uc5b8\ud560 \ub54c \ud3b8\ud558\uac8c \uc4f8 \uc218 \uc788\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">qw{}<\/code>&nbsp;\uad6c\ubb38\uc774 \uc788\ub2e4. \ud2b9\ud788&nbsp;<code style=\"color: rgb(52, 130, 117);\">use<\/code>&nbsp;\ubb38\uc744 \uc4f8 \ub54c \uc790\uc8fc \ubcfc \uc218 \uc788\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">use Account qw{create open close suspend delete};<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p>\uadf8\ubc16\uc5d0&nbsp;<a href=\"http:\/\/perldoc.perl.org\/perlop.html#Quote-and-Quote-like-Operators\">quote-like \uc5f0\uc0b0\uc790<\/a>\uac00 \uc5ec\ub7ff \uc788\ub2e4.<\/p>\n<\/li><li><p><code style=\"color: rgb(52, 130, 117);\">=~ m\/\/<\/code>\uc640&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ s\/\/\/<\/code>&nbsp;\uc5f0\uc0b0\uc5d0\uc11c \uc2ac\ub798\uc2dc(\/) \ub300\uc2e0\uc5d0 \uad04\ud638 \ub4f1\uc744 \uc815\uaddc\uc2dd \uad6c\ubd84\uc790\ub85c \uc4f8 \uc218 \uc788\ub2e4. \uc815\uaddc\uc2dd \uc548\uc5d0 \uc2ac\ub798\uc2dc \ubb38\uc790\uac00 \ub9ce\uc544\uc11c \uc77c\uc77c\ud788 \uc5ed\uc2ac\ub798\uc2dc\ub97c \uc774\uc6a9\ud558\uc5ec \ud0c8\ucd9c(escape)\uc2dc\ud0a4\ub294 \uac83\uc774 \ubc88\uac70\ub85c\uc6b8 \ub54c \uc720\uc6a9\ud558\uac8c \uc4f8 \uc218 \uc788\ub2e4. \uc608\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ m{\/\/\/}<\/code>\uc740 \uc138\uac1c\uc758 \uc2ac\ub798\uc2dc\uc5d0 \ub9e4\uce6d\ub418\uba70&nbsp;<code style=\"color: rgb(52, 130, 117);\">=~ s{^https?:\/\/}{}<\/code>\ub294 URL\uc5d0\uc11c \ud504\ub85c\ud1a0\ucf5c \ubd80\ubd84\uc744 \uc0ad\uc81c\ud55c\ub2e4.<\/p>\n<\/li><li><p>\ud384\uc5d0\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">CONSTANTS<\/code>\uac00 \uc788\ub2e4. \ud604\uc7ac\ub294 \uad8c\uc7a5\ub418\uc9c0 \uc54a\uc9c0\ub9cc \ud56d\uc0c1 \uad8c\uc7a5\ub418\uc9c0 \uc54a\uc558\ub358 \uac74 \uc544\ub2c8\ub2e4. Constants\ub294 \uc2e4\uc81c\ub85c\ub294 \uad04\ud638\uac00 \uc0dd\ub7b5\ub41c \uc11c\ube0c\ub8e8\ud2f4 \ud638\ucd9c\uc774\ub2e4.<\/p>\n<\/li><li><p>\ub54c\ub54c\ub85c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$hash{\"key\"}<\/code>\uac00 \uc544\ub2c8\ub77c&nbsp;<code style=\"color: rgb(52, 130, 117);\">$hash{key}<\/code>\ucc98\ub7fc \ud574\uc2dc\ud0a4\ub97c \ub458\ub7ec\uc2fc \ub530\uc634\ud45c\ub97c \uc0dd\ub7b5\ud560 \ub54c\uac00 \uc788\ub2e4. \uc774 \uacbd\uc6b0\ub294&nbsp;<code style=\"color: rgb(52, 130, 117);\">key<\/code>\uac00 \uc11c\ube0c\ub8e8\ud2f4 \ud638\ucd9c&nbsp;<code style=\"color: rgb(52, 130, 117);\">key()<\/code>\uac00 \uc544\ub2cc \ubb38\uc790\uc5f4&nbsp;<code style=\"color: rgb(52, 130, 117);\">\"key\"<\/code>\ub85c \ud574\uc11d\ub418\uae30 \ub54c\ubb38\uc774\ub2e4.<\/p>\n<\/li><li><p><code style=\"color: rgb(52, 130, 117);\">&lt;&lt;EOF<\/code>\uacfc \uac19\uc774&nbsp;<code style=\"color: rgb(52, 130, 117);\">&lt;&lt;<\/code>\uc744 \uad6c\ubd84\uc790\ub85c \ud3ec\ub9f7\ub418\uc9c0 \uc54a\uc740 \ucf54\ub4dc\uac00 \ub458\ub7ec\uc2f8\uc5ec \uc788\uc744 \ub54c, \"here-doc\" \uc774\ub77c\ub294 \uac80\uc0c9\uc5b4\ub85c \ucc3e\uc544\ubd10\ub77c.<\/p>\n<\/li><li><p>\ub0b4\uc7a5 \ud568\uc218 \uc911 \ub9ce\uc740 \uac83\ub4e4\uc774 \uc778\uc790\uc5c6\uc774 \uc2e4\ud589\ud560 \uc218 \uc788\uc73c\uba70 \uc774\ub54c\ub294&nbsp;<strong><code style=\"color: rgb(52, 130, 117);\">$_<\/code>&nbsp;\ubcc0\uc218\ub97c \ub300\uc0c1\uc73c\ub85c \uc2e4\ud589\ub41c\ub2e4<\/strong>. \uc774 \uc0ac\uc2e4\uc744 \uc54c\uba74 \ub2e4\uc74c \ucf54\ub4dc\ub4e4\ub97c \uc774\ud574\ud560 \uc218 \uc788\uc744 \uac83\uc774\ub2e4:<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">print foreach @array;<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p>\uadf8\ub9ac\uace0<\/p>\n<pre class=\"perl\" style=\"margin-left: 2em; color: rgb(52, 130, 117);\">foreach ( @array ) {\n    next unless defined;\n}\n<\/pre>\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<!-- \/wp:syntaxhighlighter\/code -->\n<p>\ub098\ub294 \ub9ac\ud329\ud130\ub9c1\ud560 \ub54c \ubb38\uc81c\ub97c \uc77c\uc73c\ud0ac \uc218 \uc788\uae30 \ub54c\ubb38\uc5d0 \uc774\ub7ec\ud55c \uc2dd\uc758 \ucf54\ub4dc\ub97c \uc2eb\uc5b4\ud55c\ub2e4.<\/p>\n<\/li><\/ul><p style=\"font-family: Gulim; font-size: small;\">\ub05d.<\/p>\n<h4 style=\"font-family: Gulim; font-size: small;\"><a href=\"https:\/\/qntm.org\/perl\">Back to Things Of Interest<\/a><\/h4><div id=\"papago-trans\" style=\"display: none; position: absolute !important; left: 297px; top: 626px;\"><div class=\"papago-trans-icon\" style=\"background-image:url(\/xe\/chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/papago19.png)><\/div><\/div><div class=\" papago-bubble=\"\" ui-draggable\"=\"\"><div class=\"papago-draggable papago-dragbar ui-draggable-handle\"><\/div><div><select id=\"lang-source\" class=\"papago-lang-selector\" name=\"source\"><option value=\"auto\" selected=\"\">\uc790\ub3d9\uac10\uc9c0<\/option><option value=\"en\">\uc601\uc5b4<\/option><option value=\"ja\">\uc77c\ubcf8\uc5b4<\/option><option value=\"zh-CN\">\uc911\uad6d\uc5b4 (\uac04\uccb4)<\/option><option value=\"ko\">\ud55c\uad6d\uc5b4<\/option><option class=\"es\" value=\"es\">\uc2a4\ud398\uc778\uc5b4<\/option><\/select><div style=\"display: inline-block !important; vertical-align: middle !important; margin: 0px 10px !important;\"><p id=\"papago-lang-auto\" style=\"margin: 0px !important; padding: 0px !important;\"><\/p>\n<\/div><div id=\"papago-txt1\" class=\"papago-txt\"><\/div><\/div><div><select id=\"lang-target\" class=\"papago-lang-selector\" name=\"target\"><option value=\"en\">\uc601\uc5b4<\/option><option value=\"ja\">\uc77c\ubcf8\uc5b4<\/option><option value=\"zh-CN\">\uc911\uad6d\uc5b4 (\uac04\uccb4)<\/option><option value=\"ko\">\ud55c\uad6d\uc5b4<\/option><option class=\"es\" value=\"es\">\uc2a4\ud398\uc778\uc5b4<\/option><\/select><div id=\"copy-button\" class=\"papago-toolbar-button\" title=\"copy\"><span class=\"papago-button-img\" style=\"background:url(\/xe\/chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/content_copy_black_18dp.png) 2px 2px no-repeat\"><\/span><\/div><\/div><div id=\"papago-txt2\" class=\"papago-txt\"><\/div><div class=\"papago-bubble-closebtn\" style=\"background:url(\/xe\/chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/x_8px.png) no-repeat;\" role=\"button\" tabindex=\"0\"><\/div><span class=\"papago-dragbtn papago-draggable ui-icon ui-icon-grip-dotted-vertical ui-draggable-handle\" style=\"background-image: url(\/xe\/&quot;chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/ui-icons.png&quot;)undefined;\"><\/span><span class=\"papago-gearbtn ui-icon ui-icon-gear\" style=\"background-image:url(\/xe\/chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/ui-icons.png)><\/span><span class=\" papago-pinbtn=\"\" ui-icon=\"\" ui-icon-pin-s\"=\"\"><\/span><div class=\"papago-bubble-arrow-id papago-bubble-arrow papago-bubble-arrowdown\" style=\"left: 200px;\"><div class=\"papago-bubble-arrowimplbefore\"><\/div><div class=\"papago-bubble-arrowimplafter\"><\/div><\/div><hr \/><div class=\"papago-ad\"><center style=\"height: 25px !important; min-width: 300px !important;\"><p style=\"padding: 0px !important;\">\ub9ac\ubdf0\ub294 \uac1c\ubc1c\uc790\uc5d0\uac8c \ud070 \ud798\uc774 \ub429\ub2c8\ub2e4. <a href=\"https:\/\/chrome.google.com\/webstore\/detail\/papago-translate\/enddgifdbfoefnelepppgaabobdfbcpe\/reviews\" target=\"_blank\" rel=\"noopener\">\uc751\uc6d0\ud558\ub7ec \uac00\uae30<\/a><\/p>\n<\/center><\/div><\/div><div id=\"papago-trans\" style=\"left: 130px; top: -4.92188px; position: absolute !important;\"><div class=\"papago-trans-icon\" style=\"background-image:url(chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/papago19.png)\"><\/div><\/div><div class=\"papago-bubble ui-draggable\" style=\"display: none; left: 282px; top: 887px; opacity: 1;\"><div class=\"papago-draggable papago-dragbar ui-draggable-handle\"><\/div><div><select id=\"lang-source\" class=\"papago-lang-selector\" name=\"source\"><option value=\"auto\" selected=\"\">\uc790\ub3d9\uac10\uc9c0<\/option><option value=\"en\">\uc601\uc5b4<\/option><option value=\"ja\">\uc77c\ubcf8\uc5b4<\/option><option value=\"zh-CN\">\uc911\uad6d\uc5b4 (\uac04\uccb4)<\/option><option value=\"ko\">\ud55c\uad6d\uc5b4<\/option><option class=\"es\" value=\"es\">\uc2a4\ud398\uc778\uc5b4<\/option><\/select><div style=\"display: inline-block !important; vertical-align: middle !important; margin: 0px 10px !important;\"><p id=\"papago-lang-auto\" style=\"margin: 0px !important; padding: 0px !important;\"><\/p>\n<\/div><div id=\"papago-txt1\" class=\"papago-txt\"><\/div><\/div><div><select id=\"lang-target\" class=\"papago-lang-selector\" name=\"target\"><option value=\"en\">\uc601\uc5b4<\/option><option value=\"ja\">\uc77c\ubcf8\uc5b4<\/option><option value=\"zh-CN\">\uc911\uad6d\uc5b4 (\uac04\uccb4)<\/option><option value=\"ko\">\ud55c\uad6d\uc5b4<\/option><option class=\"es\" value=\"es\">\uc2a4\ud398\uc778\uc5b4<\/option><\/select><div id=\"copy-button\" class=\"papago-toolbar-button\" title=\"copy\"><span class=\"papago-button-img\" style=\"background:url(chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/content_copy_black_18dp.png) 2px 2px no-repeat\"><\/span><\/div><\/div><div id=\"papago-txt2\" class=\"papago-txt\"><\/div><div class=\"papago-bubble-closebtn\" style=\"background:url(chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/x_8px.png) no-repeat;\" role=\"button\" tabindex=\"0\"><\/div><span class=\"papago-dragbtn papago-draggable ui-icon ui-icon-grip-dotted-vertical ui-draggable-handle\" style=\"background-image: url(&quot;chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/ui-icons.png&quot;);\"><\/span><span class=\"papago-gearbtn ui-icon ui-icon-gear\" style=\"background-image:url(chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/ui-icons.png)\"><\/span><span class=\"papago-pinbtn ui-icon ui-icon-pin-s\" style=\"background-image: url(&quot;chrome-extension:\/\/enddgifdbfoefnelepppgaabobdfbcpe\/icons\/ui-icons.png&quot;);\"><\/span><div class=\"papago-bubble-arrow-id papago-bubble-arrow papago-bubble-arrowdown\" style=\"left: 200px;\"><div class=\"papago-bubble-arrowimplbefore\"><\/div><div class=\"papago-bubble-arrowimplafter\"><\/div><\/div><hr \/><div class=\"papago-ad\"><center style=\"height: 25px !important; min-width: 300px !important;\"><p style=\"padding: 0px !important;\">\ub9ac\ubdf0\ub294 \uac1c\ubc1c\uc790\uc5d0\uac8c \ud070 \ud798\uc774 \ub429\ub2c8\ub2e4. <a style=\"color: #0099ec !important;\" href=\"https:\/\/chrome.google.com\/webstore\/detail\/papago-translate\/enddgifdbfoefnelepppgaabobdfbcpe\/reviews\" target=\"_blank\" rel=\"noopener\">\uc751\uc6d0\ud558\ub7ec \uac00\uae30<\/a><\/p>\n<\/center><\/div><\/div><!-- \/wp:freeform -->","protected":false},"excerpt":{"rendered":"<p>2\uc2dc\uac04 \ubc18\ub9cc\uc5d0 Perl \uc775\ud788\uae30 \uc800\uc790: Sam Hughes, \ubc88\uc5ed: \uae40\uc9c4(Kim Jin) \ud384(Perl)\uc740 \ub3d9\uc801 \ud0c0\uc785\uc758 \uace0\uc218\uc900, (\uc778\ud130\ud504\ub9ac\ud2b8\ub418\ub294) \uc2a4\ud06c\ub9bd\ud2b8 \uc5b8\uc5b4\ub85c PHP\uc640 \ud30c\uc774\uc36c(Python)\uacfc \ub9ce\uc774 \ube44\uad50\ub418\uace4 \ud55c\ub2e4. \ud384\uc758 \uad6c\ubb38\uc740 \uc608\uc804\uc758 \uc140 \uc2a4\ud06c\ub9bd\ud2b8 (shell script)\ub85c\ubd80\ud130 \ub9ce\uc774 \ub530\uc654\ub2e4. \uadf8\ub798\uc11c \uad6c\uae00\ub85c \uac80\uc0c9\ud558\uae30 \uc5b4\ub824\uc6b4 \ud5f7\uac08\ub9ac\uae30 \uc26c\uc6b4 \uae30\ud638\ub4e4\uc744 \ub9ce\uc774 \uc0ac\uc6a9\ud558\ub294 \uac83\uc73c\ub85c\ub3c4 \uc720\uba85\ud558\ub2e4. \uc140 \uc2a4\ud06c\ub9bd\ud2b8\ub85c\ubd80\ud130 \uae30\uc6d0\ud55c \uae4c\ub2ed\uc5d0 \ud384\uc740 \ub2e4\ub978 \uc2a4\ud06c\ub9bd\ud2b8\ub098 \ud504\ub85c\uadf8\ub7a8\uc744 \uc5ee\uc5b4\uc8fc\ub294 \uae00\ub8e8 \ucf54\ub4dc(glue code)\ub97c \ub9cc\ub4dc\ub294\ub370 [&hellip;]<\/p>\n","protected":false},"author":2,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"_import_markdown_pro_load_document_selector":0,"_import_markdown_pro_submit_text_textarea":"","site-sidebar-layout":"default","site-content-layout":"","ast-site-content-layout":"","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"","footer-sml-layout":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"default","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[18],"tags":[],"class_list":["post-791","post","type-post","status-publish","format-standard","hentry","category-development_language"],"_links":{"self":[{"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/791","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=\/wp\/v2\/users\/2"}],"replies":[{"embeddable":true,"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=791"}],"version-history":[{"count":0,"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=\/wp\/v2\/posts\/791\/revisions"}],"wp:attachment":[{"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=791"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=791"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/hasu0707.duckdns.org\/blog\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=791"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}