hide generation timestamp for perl (#4614)

samples/client/petstore/perl/t/UserApiTest.t

@@ -0,0 +1,98 @@
+=begin comment
+
+Swagger Petstore
+
+This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
+
+OpenAPI spec version: 1.0.0
+Contact: apiteam@swagger.io
+Generated by: https://github.com/swagger-api/swagger-codegen.git
+
+=end comment
+
+=cut
+
+#
+# NOTE: This class is auto generated by Swagger Codegen
+# Please update the test cases below to test the API endpoints.
+# Ref: https://github.com/swagger-api/swagger-codegen
+#
+use Test::More tests => 1; #TODO update number of test cases
+use Test::Exception;
+
+use lib 'lib';
+use strict;
+use warnings;
+
+use_ok('WWW::SwaggerClient::UserApi');
+
+my $api = WWW::SwaggerClient::UserApi->new();
+isa_ok($api, 'WWW::SwaggerClient::UserApi');
+
+#
+# create_user test
+#
+{
+    my $body = undef; # replace NULL with a proper value
+    my $result = $api->create_user(body => $body);
+}
+
+#
+# create_users_with_array_input test
+#
+{
+    my $body = undef; # replace NULL with a proper value
+    my $result = $api->create_users_with_array_input(body => $body);
+}
+
+#
+# create_users_with_list_input test
+#
+{
+    my $body = undef; # replace NULL with a proper value
+    my $result = $api->create_users_with_list_input(body => $body);
+}
+
+#
+# delete_user test
+#
+{
+    my $username = undef; # replace NULL with a proper value
+    my $result = $api->delete_user(username => $username);
+}
+
+#
+# get_user_by_name test
+#
+{
+    my $username = undef; # replace NULL with a proper value
+    my $result = $api->get_user_by_name(username => $username);
+}
+
+#
+# login_user test
+#
+{
+    my $username = undef; # replace NULL with a proper value
+    my $password = undef; # replace NULL with a proper value
+    my $result = $api->login_user(username => $username, password => $password);
+}
+
+#
+# logout_user test
+#
+{
+    my $result = $api->logout_user();
+}
+
+#
+# update_user test
+#
+{
+    my $username = undef; # replace NULL with a proper value
+    my $body = undef; # replace NULL with a proper value
+    my $result = $api->update_user(username => $username, body => $body);
+}
+
+
+1;