關於 PHP, Linux, Open Source 及個人生活記載的網誌。
RSS icon
  • Perl 或 Shell 變更 Linux 用戶密碼

    Posted on June 6th, 2009 Sam Tang No comments

    用 Perl 更改 Linux 系統密碼,可以使用 Unix::PasswdFile,它是處理 /etc/passwd 檔案的 CPAN module。
    Perl code:

    PERL:
    1. #!/usr/bin/perl
    2. use Unix::PasswdFile;
    3.  
    4. $pw = new Unix::PasswdFile "/etc/passwd";
    5. $pw->passwd("monk", $pw->encpass("My-New-Password"));
    6. $pw->commit();
    7. undef $pw;

    如果想透過 Shell Script 來變更用戶密碼,可以用以下指令:

    # echo $PASSWORD | /usr/bin/passwd --stdin $USERNAME

    Leave a reply

    *
    To prove you're a person (not a spam script), type the security word shown in the picture. Click on the picture to hear an audio file of the word.
    Click to hear an audio file of the anti-spam word