| Sys :: Lastlog. SYS :: LastLog´Â ÀϺΠUNIX¿Í °°Àº ½Ã½ºÅÛ¿¡¼ Lastlog ÆÄÀÏ¿¡ Àû´çÈ÷ °³Ã¼ Oreiented ÀÎÅÍÆäÀ̽º¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. |
Áö±Ý ´Ù¿î·Îµå |
Sys :: Lastlog. ¼øÀ§ ¹× ¿ä¾à
- ƯÇã:
- Perl Artistic License
- °Ô½ÃÀÚ À̸§:
- Jonathan Stowe
- °Ô½ÃÀÚ À¥»çÀÌÆ®:
- http://search.cpan.org/~jstowe/
Sys :: Lastlog. ű×
Sys :: Lastlog. ¼³¸í
SYS :: LastLog´Â ÀϺΠUNIX¿Í °°Àº ½Ã½ºÅÛ¿¡¼ LastLog ÆÄÀÏ¿¡ Àû´çÈ÷ ¿ÀºêÁ§Æ® Oreiented ÀÎÅÍÆäÀ̽º¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. SYS :: LastLog´Â ÀϺΠUNIX¿Í °°Àº ½Ã½ºÅÛ¿¡¼ Lastlog ÆÄÀÏ¿¡ Àû´çÈ÷ ¿ÀºêÁ§Æ® OreEInd ÀÎÅÍÆäÀ̽º¸¦ Á¦°øÇÏ´Â Perl ¸ðµâÀÔ´Ï´Ù. Sys :: LastLog; ³» $ ll = sys :: lastlog-> new (); while (my $ llent = $ ll-> getllent ()) {print $ llent-> ll_line (), "n"; } ´ëºÎºÐÀÇ UNIX¿Í °°Àº ½Ã½ºÅÛ¿¡¼ Á¦°øµÇ´Â Lastlog ÆÄÀÏÀº ½Ã½ºÅÛÀÇ °¢ »ç¿ëÀÚ°¡ ¸¶Áö¸·À¸·Î ·Î±×ÀÎ ÇÑ °æ¿ì¿¡ Á¤º¸¸¦ ÀúÀåÇÕ´Ï´Ù. ÆÄÀÏÀº UID¿¡¼ ¼øÂ÷ÀûÀÌ°í Àε¦½ÌµË´Ï´Ù (UID 500À» »ç¿ëÇÏ´Â »ç¿ëÀÚ°¡ 500 ¹ø° ·¹Äڵ尡 ÆÄÀÏ). ´ëºÎºÐÀÇ ½Ã½ºÅÛÀºÀÌ ÆÄÀÏ¿¡ ¾×¼¼½ºÇϱâ À§ÇØ C API¸¦ Á¦°øÇÏÁö ¾ÊÀ¸¸ç 'Lastlog'¿Í °°Àº ÇÁ·Î±×·¥ÀºÀ̸¦ ¼öÇàÇÏ´Â ÀÚü ¸Þ¼µå¸¦ Á¦°øÇÕ´Ï´Ù.ÀÌ ¸ðµâÀº 'lastlog'¿Í °°Àº ÇÁ·Î±×·¥ÀÌ ÀÛ¼ºÇÒ ¼ö ÀÖµµ·ÏÀÌ ÆÄÀÏ¿¡ ¾×¼¼½ºÇÏ´Â °´Ã¼ ÁöÇâ Perl API¸¦ Á¦°øÇÕ´Ï´Ù. Perl (¿¹ :ÀÌ ¹èÆ÷)¿¡¼ 'Çöó½ºÇ÷α×'ÇÁ·Î±×·¥) ¶Ç´Â ±× ÇÁ·Î±×·¥Àº ÀÚ½ÅÀÇ ¸ñÀûÀ» À§ÇØ ¸¶Áö¸·À¸·Î ·Î±×ÀÎ ÇÑ »ç¿ëÀÚ¸¦ °áÁ¤ÇÒ ¼ö ÀÖ½À´Ï´Ù.ÀÌ ¸ðµâÀº UID ¶Ç´Â ·Î±×ÀÎ À̸§À¸·Î LastLog¿¡ ¼øÂ÷ÀûÀ¸·Î ¾×¼¼½ºÇÏ´Â ¼¼ °¡Áö ¹æ¹ýÀ» Á¦°øÇÕ´Ï´Ù. °¢ ¸Þ¼Òµå´Â sys :: lastlog :: Ç׸ñÀÇ °´Ã¼¸¦ ¹ÝȯÇÕ´Ï´Ù. ÀÚü°¡ °¢ ·¹Äڵ忡 ´ëÇÑ Á¤º¸¿¡ ¾×¼¼½ºÇϱâÀ§ÇÑ ¸Þ¼Òµå¸¦ Á¦°øÇÕ´Ï´Ù. ¿ä±¸ »çÇ× : ¡¤ Perl.
Sys :: Lastlog. °ü·Ã ¼ÒÇÁÆ®¿þ¾î