Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
    
    ...
       print "No response\n";
       print $res->status_line . "\n";
    }
    
  2. or download this
    open(MYFILE, '/tmp/data.txt');
    print MYFILE $res->content;
    close(MYFILE);
    
  3. or download this
    my $returnData = $res->content;
    open(MYFILE, '/tmp/data.txt');
    print MYFILE $returnData;
    close(MYFILE);