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 287
114  perl -p -i -e s/abc/def/g JMJS 24.3.26 315
113  Deleting from a Hash , defined , exists JMJS 25.7.9 320
112  yaml file Àбâ JMJS 23.11.30 357
111  alzipcon JMJS 22.11.26 400
110  file2date.pl JMJS 24.6.1 539
109  UTF-8, EUC-KR JMJS 19.12.15 485
108  wget.pl LWP Simple get JMJS 19.9.17 505
107  X JMJS 19.9.17 509
106  X JMJS 19.9.17 510
105  X JMJS 19.9.17 499
104  X JMJS 19.9.17 494
103  X JMJS 19.9.17 494
102  X JMJS 19.9.17 495
101  gnome-terminal JMJS 25.7.3 513
100  jsame.pl JMJS 09.5.21 2026
99  jos.pl JMJS 08.11.29 1752
98  jmngr.pl - jmjspro manager JMJS 08.11.29 1798
97  vhdl.pm JMJS 08.11.29 1768
96  jreg.pl JMJS 08.11.29 1754
95  jtree.pm JMJS 08.11.29 1828
94  w2c.pl JMJS 08.11.29 1787
93  jdread.pl JMJS 08.11.29 1565
92  ffile.zip ffilediff.pl JMJS 09.4.24 1615
91  rgb2ycbcr.pl JMJS 10.5.12 1932
90  proview.pl JMJS 08.11.29 2014
89  smi_shift.pl JMJS 10.10.3 1596
88  srt2smi.pl srtshift.pl JMJS 18.7.14 1801
87  Perl CGI Input Test, getenv.cgi JMJS 18.11.21 1489
86  hash JMJS 24.6.22 1739
85  tr a-z A-Z ġȯ , ´ë¼Ò¹®ÀÚ º¯È¯ , ¹®ÀÚ¿­ Á¶°Ç , ... JMJS 24.6.22 1539
84  JARRAY->jfunc JMJS 08.10.2 1500
83  ¼öÄ¡ÇÔ¼ö - ... JMJS 09.5.7 2013
82  ¿ªÇà·Ä3x3 JMJS 09.5.7 2024
81  hex2int.pl JMJS 10.9.12 2747
80  stat - file status º¸±â JMJS 07.12.16 1622
79  Perl Tip JMJS 24.6.22 2782
78  SMI file sync delay JMJS 07.7.18 1711
77  rmword.pl JMJS 07.6.18 1638
76  pack unpack JMJS 24.6.22 1544
75  [Perl]read_dir.pl JMJS 07.2.22 1839
74  [Perl]jtab2char - tab¹®ÀÚ¸¦ ƯÁ¤ char·Î ¹Ù²ãÁÖ±â JMJS 07.2.22 1810
73  Perl ¼ýÀÚ Sorting JMJS 11.5.17 1878
72  [CGI]GET and POST JMJS 06.11.20 3538
71  Perl Grammer JMJS 06.9.4 3107
70  Ç¥ÁØ ¸ðµâ JMJS 06.8.10 2006
69  Getopt::Long example JMJS 06.8.10 2201
68  array of array JMJS 06.4.22 1618
67  [HTML]Å×ÀÌºí ¹è°æ¿¡ ±×¸²³Ö±â JMJS 06.3.8 1705
66  l2w.pm - line to word JMJS 08.12.1 1713
65  make_random_chars JMJS 05.8.10 1534
64  mail º¸³»´Â script JMJS 05.3.23 1512
63  ½ÇÇàÆÄÀÏÀ» ½ÇÇà½Ã۰í Ç¥ÁØ¿¡·¯ Àбâ JMJS 09.2.25 1517
62  ÆË¾÷â(°øÁöâ)¶ç¿ì±â Jinsung 03.12.16 2597
61  print <<ENDLINE JMJS 03.12.5 1606
60  [HTML]Target JMJS 03.5.21 1634
59  [Perl]jutil.pm JMJS 03.5.3 1886
58  [Perl]jdiff.pl JMJS 02.6.6 1788
57  [Perl]cfilter.pm - commant filter JMJS 02.1.31 1825
56  [HTML]ÀÚµ¿À¸·Î ´Ù¸¥ ÆäÀÌÁö À̵¿ JMJS 02.1.19 1654
55  STDIN file open glob -w warning JMJS 24.6.22 1692
54  opendir , readdir , closedir JMJS 24.6.22 1697
53  rand_diff JMJS 01.10.23 1589
52  vcd2v.pl JMJS 15.8.25 1665
51  file upload JMJS 24.6.22 1610
50  umask(070) <- chmod o-rwx Áø¼º 01.3.16 1763
49  head2index Áø¼º 01.3.15 1494
48  grep.pl JMJS 11.1.20 1582
47  chr(13) = \M Áø¼º 01.3.15 1447
46  stty JMJS 01.3.12 1559
45  des.pl JMJS 01.3.8 1522
44  chr_plus.pl JMJS 01.3.8 1542
43  get passwd in unix JMJS 19.8.18 1397
42  unsort JMJS 19.9.10 1623
41  read from website web JMJS 19.5.15 1422
40  vec JMJS 01.3.8 1683
39  chomp $_ @_ say defined use 5.010 state grep any ... JMJS 18.10.27 1605
38  [Perl Tk] µµ½ºÃ¢ ¾øÀÌ, ÆÞ Tk ½ºÅ©¸³Æ® ½ÇÇàÇϱâ; ... JMJS 17.9.30 1572
37  @bs = sort {$a <=> $b} @as; JMJS 17.7.12 1635
36  if ( -e -z -s -f -d -T -B -M ) JMJS 16.3.10 1732
35  mkmm.pl - make freemind JMJS 12.5.22 1672
34  perl -pi.orig -e "s/\bu_(\w+_t)\b/u$1/g" *.c JMJS 11.8.26 1655
33  .xls output csv ÆÄÀÏ¿¡ \n "°¡ ÀÖÀ»¶§ JMJS 11.4.13 1548
32  jdcat.pl juncat.pl JMJS 11.2.24 1709
31  print chr(ord('a')); JMJS 01.3.8 1610
30  require "/user/home/jin1/jin1.pm"; JMJS 00.11.28 1551
29  for(my $i=0; $i < @abc; $i ++) {} JMJS 00.11.15 1632
28  remove blank $abc =~ s/[\s]+//g; Á¤±ÔÇ¥Çö½Ä ... JMJS 25.7.16 1579
27  array and for JMJS 00.11.14 1418
26  È¨ÆäÀÌÁö ÀÚµ¿ À̵¿ JMJS 00.10.28 1503
25  html¿¡¼­ ¾²ÀÌ´Â ±âȣǥ½Ã¹æ¹ý JMJS 00.9.30 1438
24  ¹è¿­ÀÇ ¹üÀ§ ¿¬»êÀÚ JMJS 00.9.20 1737
23  for(1..3) { print "$_";} JMJS 09.4.24 1404
22  package JMJS 24.6.22 1483
21  ÁÙ¿¡¼­ ÇѱÛÀÚ °íÄ¡±â JMJS 00.8.7 1548
20  hotkey function by getc JMJS 00.7.21 1635
19  read, sysread, syswrite JMJS 00.7.21 2499
18  crypt JMJS 00.7.13 1742
17  csv2gan.pl JMJS 11.4.4 1750
16  hexa JMJS 24.6.18 1586
15  file in out.pl JMJS 00.7.5 1774
14  ARGV JMJS 00.7.5 1598
13  jtime.pm - localtime, timelocal JMJS 09.4.9 2113
12  @INC JMJS 00.7.5 1951
11  $#myarray JMJS 00.7.5 1709
10  Hash of Array JMJS 00.7.5 1532
9  package JARRAY JHASH JMJS 00.7.4 1778
8  foreach, while each, dos2unix.pl, next last JMJS 09.4.24 1766
7  base64 enc dec binary JMJS 25.6.30 1562
6  file lock JMJS 00.7.4 1660
5  gettime JMJS 00.7.4 1654
4  [Perl]jcdread.pl JMJS 00.7.4 1728
3  [Perl]jdread.pl JMJS 00.7.4 1626
2  Monti Hall problem JMJS 24.6.27 1615
1  DESTROY JMJS 09.7.20 1573
[1]