| Firesys :: DiskUsage. FILES :: DISKUSAGE´Â ÆÄÀÏ °ø°£ »ç¿ë·®À» ÃßÁ¤ÇÏ´Â PERL ¸ðµâÀÔ´Ï´Ù (`du`¿Í À¯»ç). |
Áö±Ý ´Ù¿î·Îµå |
Firesys :: DiskUsage. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~cog/Acme-AsciiArt2HtmlTable-0.01/lib/Acme/AsciiArt2HtmlTable.pm
Firesys :: DiskUsage. ű×
Firesys :: DiskUsage. ¼³¸í
FILESYS :: DISKUSAGE´Â ÆÄÀÏ °ø°£ »ç¿ëÀ» ¿¹ÃøÇÏ´Â PERL ¸ðµâÀÔ´Ï´Ù (`du`¿Í À¯»ç). FileSys :: DiskUsage´Â ÆÄÀÏ °ø°£ »ç¿ë·®À» ÃßÁ¤ÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù (`du`) .Synopsis filesys :: diskusage qw / du /;; # Basic $ Total = du (QW / File1 File2 Directory1 /); ¶Ç´Â # no Àç±Í $ Total = du ({recursive => 0},); ¶Ç´Â # ÃÖ´ë ±íÀÌ´Â 1 $ Total = du ({ 'ÃÖ´ë ±íÀÌ '=> 1},); # ¶Ç´Â # ¹è¿ @Sizes = du (@Files) °¡Á® ¿À±â; ¶Ç´Â # Çؽà % Å©±â = du ({'make-hash '=> 1}, @FILES_AND_DIRECTECIE) Usage.get ÆÄÀÏÀÇ Å©±â : $ Total = du (qw / file1 file2 /); µð·ºÅ丮ÀÇ Å©±â¸¦ °¡Á®¿É´Ï´Ù. $ Total = du (qw / file1 directory1 /); ¿ä±¸ »çÇ× : ¡¤ Perl.
Firesys :: DiskUsage. °ü·Ã ¼ÒÇÁÆ®¿þ¾î