Check if you are vulnerable to the OpenSSL « heartbleed » bug.
curl -s https://gist.githubusercontent.com/ironcamel/10223348/raw/ssl-heartbleed-check.pl | perl
| x = 0 | |
| [1,2,3].each{|x| puts x} | |
| puts x |
| #!/usr/bin/env perl | |
| # Based on Randy Stauner's http://blogs.perl.org/users/randy_stauner/2011/06/exploratory-one-liners-with-less-typing.html | |
| # and Marco Fontani's https://gist.github.com/1042504. | |
| # To install all dependencies: | |
| # sudo cpanm File::Slurp JSON::XS Data::Dump YAML::XS utf8::all Class::Autouse | |
| # Installation: | |
| # copy this file to ~/bin/p | |
| # Example usage: | |
| # p 'dd [File::Spec->path]' # dynamically load arbitrary modules | |
| # p -pe 's/foo/bar/' foo.txt # use your favorite options like -lane |
Check if you are vulnerable to the OpenSSL « heartbleed » bug.
curl -s https://gist.githubusercontent.com/ironcamel/10223348/raw/ssl-heartbleed-check.pl | perl