reviewed example in documentation

Author: KaiSchwarz-cnic

docs/connection.html

@@ -5,7 +5,7 @@
 <!--
   generated by Pod::Simple::HTML v3.35,
   using Pod::Simple::PullParser v3.35,
-  under Perl v5.026000 at Tue Jul 24 12:48:06 2018 GMT.
+  under Perl v5.026000 at Tue Jul 24 14:30:29 2018 GMT.
 
  If you want to change this HTML document, you probably shouldn't do that
    by changing it directly.  Instead, see about changing the calling options

docs/connector.html

@@ -5,7 +5,7 @@
 <!--
   generated by Pod::Simple::HTML v3.35,
   using Pod::Simple::PullParser v3.35,
-  under Perl v5.026000 at Tue Jul 24 12:48:06 2018 GMT.
+  under Perl v5.026000 at Tue Jul 24 14:30:29 2018 GMT.
 
  If you want to change this HTML document, you probably shouldn't do that
    by changing it directly.  Instead, see about changing the calling options
@@ -40,7 +40,9 @@ <h1><a class='u'
         cpanm WebService::Hexonet::Connector
         # NOTE: We suggest to use cpanm (App::cpanminus) for several reasons.
 
-        # Import the Hexonet package
+
+        use strict;
+        use warnings;
         use WebService::Hexonet::Connector;
 
         # Create a connection with the URL, entity, login and password
@@ -61,12 +63,14 @@ <h1><a class='u'
 
         # Display the result in the format you want
         my $res = $response-&#62;as_list();
-        my $res = $response-&#62;as_list_hash();
-        my $res = $response-&#62;as_hash();
+        $res = $response-&#62;as_list_hash();
+        $res = $response-&#62;as_hash();
 
         # Get the response code and the response description
         my $code = $response-&#62;code();
-        my $description = $response-&#62;description();</pre>
+        my $description = $response-&#62;description();
+
+        print &#34;$code $description&#34;;</pre>
 
 <h1><a class='u'
 name="DESCRIPTION"

docs/hexonet.html

@@ -5,7 +5,7 @@
 <!--
   generated by Pod::Simple::HTML v3.35,
   using Pod::Simple::PullParser v3.35,
-  under Perl v5.026000 at Tue Jul 24 12:48:06 2018 GMT.
+  under Perl v5.026000 at Tue Jul 24 14:30:29 2018 GMT.
 
  If you want to change this HTML document, you probably shouldn't do that
    by changing it directly.  Instead, see about changing the calling options

docs/response.html

@@ -5,7 +5,7 @@
 <!--
   generated by Pod::Simple::HTML v3.35,
   using Pod::Simple::PullParser v3.35,
-  under Perl v5.026000 at Tue Jul 24 12:48:06 2018 GMT.
+  under Perl v5.026000 at Tue Jul 24 14:30:29 2018 GMT.
 
  If you want to change this HTML document, you probably shouldn't do that
    by changing it directly.  Instead, see about changing the calling options

docs/util.html

@@ -5,7 +5,7 @@
 <!--
   generated by Pod::Simple::HTML v3.35,
   using Pod::Simple::PullParser v3.35,
-  under Perl v5.026000 at Tue Jul 24 12:48:06 2018 GMT.
+  under Perl v5.026000 at Tue Jul 24 14:30:29 2018 GMT.
 
  If you want to change this HTML document, you probably shouldn't do that
    by changing it directly.  Instead, see about changing the calling options

lib/WebService/Hexonet/Connector.pm

@@ -31,7 +31,9 @@ WebService::Hexonet::Connector - Connector library for the insanely fast L<HEXON
 	cpanm WebService::Hexonet::Connector
 	# NOTE: We suggest to use cpanm (App::cpanminus) for several reasons.
 
-	# Import the Hexonet package
+
+	use strict;
+	use warnings;
 	use WebService::Hexonet::Connector;
 
 	# Create a connection with the URL, entity, login and password
@@ -52,13 +54,14 @@ WebService::Hexonet::Connector - Connector library for the insanely fast L<HEXON
 
 	# Display the result in the format you want
 	my $res = $response->as_list();
-	my $res = $response->as_list_hash();
-	my $res = $response->as_hash();
+	$res = $response->as_list_hash();
+	$res = $response->as_hash();
 
 	# Get the response code and the response description
 	my $code = $response->code();
 	my $description = $response->description();
 
+	print "$code $description";
 
 =head1 DESCRIPTION