Skip to content

Instantly share code, notes, and snippets.

@yaasita

yaasita/unlock

Created December 1, 2013 16:34
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save yaasita/7736386 to your computer and use it in GitHub Desktop.
Save yaasita/7736386 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
unlock
#!/usr/bin/suidperl
$ENV{PATH}="/usr/sbin/";
system "usermod --unlock sotossh" and die $!;
print <<"HTML";
Content-type: text/html;
<META http-equiv="Content-Type" content="text/html; charset=UTF-8">
<html>
<body>
<h1>scrit run!</h1>
</body>
</html>
HTML
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment