Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- use LWP::Simple;
- local $salt_info = get('http://api.wordpress.org/secret-key/1.1/salt')
- or die 'Unable to get salt info';
- local @wordpresssalt = split('\n', $salt_info);
- if ($l =~ /^define\('AUTH_KEY',/) {
- $l = @wordpresssalt[0];
- }
- if ($l =~ /^define\('SECURE_AUTH_KEY',/) {
- $l = @wordpresssalt[1];
- }
- if ($l =~ /^define\('LOGGED_IN_KEY',/) {
- $l = @wordpresssalt[2];
- }
- if ($l =~ /^define\('NONCE_KEY',/) {
- $l = @wordpresssalt[3];
- }
- if ($l =~ /^define\('AUTH_SALT',/) {
- $l = @wordpresssalt[4];
- }
- if ($l =~ /^define\('SECURE_AUTH_SALT',/) {
- $l = @wordpresssalt[5];
- }
- if ($l =~ /^define\('LOGGED_IN_SALT',/) {
- $l = @wordpresssalt[6];
- }
- if ($l =~ /^define\('NONCE_SALT',/) {
- $l = @wordpresssalt[7];
- }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement