Corion,
I get an empty string when I print the file content.
my $file_content = $mech->get($foo);
print $file_content;
Here is the result returned by the Data::Dumper
$VAR1 = bless( {
'_headers' => bless( {
'::std_case' => {
'x-frame-opt
+ions' => 'X-Frame-Options',
'expect-ct'
+=> 'Expect-CT',
'content-sec
+urity-policy' => 'Content-Security-Policy',
'x-xss-prote
+ction' => 'X-XSS-Protection',
'x-content-t
+ype-options' => 'X-Content-Type-Options',
'strict-tran
+sport-security' => 'Strict-Transport-Security',
'referrer-po
+licy' => 'Referrer-Policy'
},
'content-security-policy' => '
+default-src \'self\' data: https: \'unsafe-eval\' \'unsafe-inline\'',
'date' => 'Sun, 11 Jul 2021 19
+:46:11 GMT',
'strict-transport-security' =>
+ 'max-age=31536000; includeSubDomains',
'etag' => '"06c81313776d71:0"'
+,
'expect-ct' => 'enforce, max-a
+ge=30, report-uri="https://{$subdomain}.report-uri.com/r/d/ct/enforce
+"',
'x-frame-options' => 'SAMEORIG
+IN',
'server' => '',
'x-content-type-options' => 'n
+osniff',
'x-xss-protection' => '1;mode=
+block',
'accept-ranges' => 'bytes',
'referrer-policy' => 'no-refer
+rer'
}, 'HTTP::Headers' ),
'_request' => undef,
'_content' => '',
'_rc' => 304,
'_msg' => 'Not Modified'
}, 'HTTP::Response' );
-
Are you posting in the right place? Check out Where do I post X? to know for sure.
-
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big>
<blockquote> <br /> <dd>
<dl> <dt> <em> <font>
<h1> <h2> <h3> <h4>
<h5> <h6> <hr /> <i>
<li> <nbsp> <ol> <p>
<small> <strike> <strong>
<sub> <sup> <table>
<td> <th> <tr> <tt>
<u> <ul>
-
Snippets of code should be wrapped in
<code> tags not
<pre> tags. In fact, <pre>
tags should generally be avoided. If they must
be used, extreme care should be
taken to ensure that their contents do not
have long lines (<70 chars), in order to prevent
horizontal scrolling (and possible janitor
intervention).
-
Want more info? How to link
or How to display code and escape characters
are good places to start.