fork(2) download
copy 
  1. #!/usr/bin/perl
  2. # your code goes hereuse strict;
  3. use warnings;
  4. use v5.14;
  5. use LWP::UserAgent;
  6.  
  7. use Data::Dumper;
  8.  
  9. my $ua = LWP::UserAgent->new;
  10.  
  11. my $re = $ua->post("https://a...content-available-to-author-only...h.net/v1/auth/", [
  12. 		ID => "",
  13. 		PW => "",
  14. 		KY => "xxfvFQcOzpTBvwuwPMwwzLZxiCSaGb",
  15. 		CT => "",
  16. 		HB => "",
  17. 	],
  18. 	"User-Agent" => "Monazilla/1.3",
  19. 	"X-2ch-UA" => "JaneStyle/3.80",
  20. );
  21.  
  22. print $re->as_string;
  23.  
Runtime error #stdin #stdout #stderr 0s 6176KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
Can't locate LWP/UserAgent.pm in @INC (you may need to install the LWP::UserAgent module) (@INC contains: /etc/perl /usr/local/lib/i386-linux-gnu/perl/5.20.1 /usr/local/share/perl/5.20.1 /usr/lib/i386-linux-gnu/perl5/5.20 /usr/share/perl5 /usr/lib/i386-linux-gnu/perl/5.20 /usr/share/perl/5.20 /usr/local/lib/site_perl .) at prog.pl line 5.
BEGIN failed--compilation aborted at prog.pl line 5.
https://ideone.com/rebnT4
language:
Perl (perl 5.28.1)
created:
9 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!