LogIn E-mail
¼³°èÀ̾߱â
@INC
# 12 JMJS    00.7.5 11:43

%cat Cocoa.pm
package Cocoa;
sub new {
   my $this = {};
   bless $this;
   return $this;
}

1;

%cat Java.pm
#!/usr/bin/perl
push(@INC,'pwd');
use Cocoa;
$cup = new Cocoa;
...

%

push(@INC,'pwd');´Â ·ÎÄà µð·ºÅ丮¸¦ @INCÀÇ °Ë»ö °æ·Î¿¡ Ãß°¡ÇÑ´Ù. @INC´Â ÆÐŰÁö¸¦ ãÀ» ¶§ »ç¿ëµÉ °æ·ÎÀÇ ¸ñ·ÏÀÌ´Ù. ´Ù¸¥ µð·ºÅ丮¿¡ ¸ðµâÀ» ¸¸µé°í, °æ·Î¸¦ ¸í½ÃÇÏ¿© »ç¿ëÇÒ ¼ö ÀÖ´Ù.
¶Ç´Â push(@INC,"/home/khusain/test/scripts/")½ÄÀ¸·Î ¾µ¼öµµ ÀÖ´Ù.
use¹®¿¡ ÀÇÇØ PerlÀÎÅÍÇÁ¸®ÅÍ´Â @INC °æ·Î¸¦ °Ë»öÇϰí, ÆÐŰÁö Cocoa.pmÀ» Æ÷ÇÔ½ÃÄÑ ½ºÅ©¸³Æ®¿¡ µé¾î°¥ ¸ðµç ±â´ÉÀ» ±¸ÇöÇÑ´Ù. ÀÌ¿Í °°ÀÌ use¹®À» ÀÌ¿ëÇÔÀ¸·Î½á Ŭ·¡½º¸¦ »ç¿ëÇÒ ¼ö ÀÖ´Ù.

°Ô½Ã¹°: 115 °Ç, ÇöÀç: 1 / 1 ÂÊ
¹øÈ£ Á¦       ¸ñ ÀÛ¼ºÀÚ µî·ÏÀÏ ¹æ¹®
115  perl format JMJS 24.6.22 477
114  perl -p -i -e s/abc/def/g JMJS 24.3.26 417
113  Deleting from a Hash , defined , exists JMJS 25.7.9 488
112  yaml file Àбâ JMJS 23.11.30 534
111  alzipcon JMJS 22.11.26 583
110  file2date.pl JMJS 24.6.1 685
109  UTF-8, EUC-KR JMJS 19.12.15 709
108  wget.pl LWP Simple get JMJS 19.9.17 711
107  X JMJS 19.9.17 678
106  X JMJS 19.9.17 696
105  X JMJS 19.9.17 705
104  X JMJS 19.9.17 693
103  X JMJS 19.9.17 695
102  X JMJS 19.9.17 671
101  gnome-terminal JMJS 25.7.3 695
100  jsame.pl JMJS 09.5.21 2261
99  jos.pl JMJS 08.11.29 1934
98  jmngr.pl - jmjspro manager JMJS 08.11.29 1985
97  vhdl.pm JMJS 08.11.29 1879
96  jreg.pl JMJS 08.11.29 1930
95  jtree.pm JMJS 08.11.29 1925
94  w2c.pl JMJS 08.11.29 1977
93  jdread.pl JMJS 08.11.29 1719
92  ffile.zip ffilediff.pl JMJS 09.4.24 1779
91  rgb2ycbcr.pl JMJS 10.5.12 2065
90  proview.pl JMJS 08.11.29 2130
89  smi_shift.pl JMJS 10.10.3 1780
88  srt2smi.pl srtshift.pl JMJS 18.7.14 1984
87  Perl CGI Input Test, getenv.cgi JMJS 18.11.21 1631
86  hash JMJS 24.6.22 1910
85  tr a-z A-Z ġȯ , ´ë¼Ò¹®ÀÚ º¯È¯ , ¹®ÀÚ¿­ Á¶°Ç , ... JMJS 24.6.22 1616
84  JARRAY->jfunc JMJS 08.10.2 1681
83  ¼öÄ¡ÇÔ¼ö - ... JMJS 09.5.7 2153
82  ¿ªÇà·Ä3x3 JMJS 09.5.7 2290
81  hex2int.pl JMJS 10.9.12 2844
80  stat - file status º¸±â JMJS 07.12.16 1812
79  Perl Tip JMJS 24.6.22 2876
78  SMI file sync delay JMJS 07.7.18 1867
77  rmword.pl JMJS 07.6.18 1810
76  pack unpack JMJS 24.6.22 1843
75  [Perl]read_dir.pl JMJS 07.2.22 2091
74  [Perl]jtab2char - tab¹®ÀÚ¸¦ ƯÁ¤ char·Î ¹Ù²ãÁÖ±â JMJS 07.2.22 2004
73  Perl ¼ýÀÚ Sorting JMJS 11.5.17 2043
72  [CGI]GET and POST JMJS 06.11.20 3638
71  Perl Grammer JMJS 06.9.4 3229
70  Ç¥ÁØ ¸ðµâ JMJS 06.8.10 2190
69  Getopt::Long example JMJS 06.8.10 2281
68  array of array JMJS 06.4.22 1795
67  [HTML]Å×ÀÌºí ¹è°æ¿¡ ±×¸²³Ö±â JMJS 06.3.8 1881
66  l2w.pm - line to word JMJS 08.12.1 1894
65  make_random_chars JMJS 05.8.10 1701
64  mail º¸³»´Â script JMJS 05.3.23 1696
63  ½ÇÇàÆÄÀÏÀ» ½ÇÇà½Ã۰í Ç¥ÁØ¿¡·¯ Àбâ JMJS 09.2.25 1715
62  ÆË¾÷â(°øÁöâ)¶ç¿ì±â Jinsung 03.12.16 2725
61  print <<ENDLINE JMJS 03.12.5 1769
60  [HTML]Target JMJS 03.5.21 1829
59  [Perl]jutil.pm JMJS 03.5.3 1981
58  [Perl]jdiff.pl JMJS 02.6.6 1985
57  [Perl]cfilter.pm - commant filter JMJS 02.1.31 1975
56  [HTML]ÀÚµ¿À¸·Î ´Ù¸¥ ÆäÀÌÁö À̵¿ JMJS 02.1.19 1828
55  STDIN file open glob -w warning JMJS 24.6.22 1879
54  opendir , readdir , closedir JMJS 24.6.22 1848
53  rand_diff JMJS 01.10.23 1780
52  vcd2v.pl JMJS 15.8.25 1745
51  file upload JMJS 24.6.22 1773
50  umask(070) <- chmod o-rwx Áø¼º 01.3.16 1960
49  head2index Áø¼º 01.3.15 1642
48  grep.pl JMJS 11.1.20 1772
47  chr(13) = \M Áø¼º 01.3.15 1615
46  stty JMJS 01.3.12 1729
45  des.pl JMJS 01.3.8 1634
44  chr_plus.pl JMJS 01.3.8 1684
43  get passwd in unix JMJS 19.8.18 1591
42  unsort JMJS 19.9.10 1912
41  read from website web JMJS 19.5.15 1575
40  vec JMJS 01.3.8 1878
39  chomp $_ @_ say defined use 5.010 state grep any ... JMJS 18.10.27 1711
38  [Perl Tk] µµ½ºÃ¢ ¾øÀÌ, ÆÞ Tk ½ºÅ©¸³Æ® ½ÇÇàÇϱâ; ... JMJS 17.9.30 1751
37  @bs = sort {$a <=> $b} @as; JMJS 17.7.12 1809
36  if ( -e -z -s -f -d -T -B -M ) JMJS 16.3.10 1846
35  mkmm.pl - make freemind JMJS 12.5.22 1822
34  perl -pi.orig -e "s/\bu_(\w+_t)\b/u$1/g" *.c JMJS 11.8.26 1828
33  .xls output csv ÆÄÀÏ¿¡ \n "°¡ ÀÖÀ»¶§ JMJS 11.4.13 1749
32  jdcat.pl juncat.pl JMJS 11.2.24 1882
31  print chr(ord('a')); JMJS 01.3.8 1783
30  require "/user/home/jin1/jin1.pm"; JMJS 00.11.28 1708
29  for(my $i=0; $i < @abc; $i ++) {} JMJS 00.11.15 1740
28  remove blank $abc =~ s/[\s]+//g; Á¤±ÔÇ¥Çö½Ä ... JMJS 25.7.16 1704
27  array and for JMJS 00.11.14 1572
26  È¨ÆäÀÌÁö ÀÚµ¿ À̵¿ JMJS 00.10.28 1680
25  html¿¡¼­ ¾²ÀÌ´Â ±âȣǥ½Ã¹æ¹ý JMJS 00.9.30 1516
24  ¹è¿­ÀÇ ¹üÀ§ ¿¬»êÀÚ JMJS 00.9.20 1920
23  for(1..3) { print "$_";} JMJS 09.4.24 1571
22  package JMJS 24.6.22 1638
21  ÁÙ¿¡¼­ ÇѱÛÀÚ °íÄ¡±â JMJS 00.8.7 1690
20  hotkey function by getc JMJS 00.7.21 1712
19  read, sysread, syswrite JMJS 00.7.21 2661
18  crypt JMJS 00.7.13 1945
17  csv2gan.pl JMJS 11.4.4 1936
16  hexa JMJS 24.6.18 1736
15  file in out.pl JMJS 00.7.5 1908
14  ARGV JMJS 00.7.5 1785
13  jtime.pm - localtime, timelocal JMJS 09.4.9 2195
12  @INC JMJS 00.7.5 2157
11  $#myarray JMJS 00.7.5 1901
10  Hash of Array JMJS 00.7.5 1689
9  package JARRAY JHASH JMJS 00.7.4 2060
8  foreach, while each, dos2unix.pl, next last JMJS 09.4.24 1935
7  base64 enc dec binary JMJS 25.6.30 1741
6  file lock JMJS 00.7.4 1828
5  gettime JMJS 00.7.4 1964
4  [Perl]jcdread.pl JMJS 00.7.4 1908
3  [Perl]jdread.pl JMJS 00.7.4 1787
2  Monti Hall problem JMJS 24.6.27 1772
1  DESTROY JMJS 09.7.20 1772
[1]