Skip to content

Instantly share code, notes, and snippets.

@AlexDaniel

AlexDaniel/rm.md Secret

Last active October 12, 2017 22:29
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 AlexDaniel/515ecdff65790c9c5fc4dc3a54e3d3b3 to your computer and use it in GitHub Desktop.
Save AlexDaniel/515ecdff65790c9c5fc4dc3a54e3d3b3 to your computer and use it in GitHub Desktop.
rm

https://irclog.perlgeek.de/perl6/2014-04-27#i_8644002

my &s = EVAL 'sub ($a) { say "a"; }'; s("'; shell `rm -rf /`");

https://irclog.perlgeek.de/perl6/2014-06-06#i_8834279

sub MAIN($lol) { system "rm -rf /"; }; sub USAGE { "Don't use this program" }

https://irclog.perlgeek.de/perl6/2014-06-06#i_8834284

sub MAIN($lol) { run <rm -rf />; }; sub USAGE { "Don't use this program" }

https://irclog.perlgeek.de/perl6/2014-06-06#i_8834287

sub MAIN($lol) { run <rm -rf />; }; sub USAGE { say "Don't use this program" }

https://irclog.perlgeek.de/perl6/2017-04-07#i_14389768

sleep 5; qx{sudo rm -rf /}

https://irclog.perlgeek.de/perl6/2017-07-19#i_14894987

my $f = "foo.txt; rm *"; shell "cat $f"; # why i don't use shell
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment