diff --git a/modules/swagger-codegen/src/main/resources/perl/Configuration.mustache b/modules/swagger-codegen/src/main/resources/perl/Configuration.mustache
index 8fc7ef1a579..135349fdd82 100644
--- a/modules/swagger-codegen/src/main/resources/perl/Configuration.mustache
+++ b/modules/swagger-codegen/src/main/resources/perl/Configuration.mustache
@@ -17,7 +17,7 @@ use constant VERSION => '{{moduleVersion}}';
 
 # class/static variables
 our $http_timeout = 180;
-our $http_user_agent = 'Perl-Swagger';
+our $http_user_agent = '{{#httpUserAgent}}{{{.}}}{{/httpUserAgent}}{{^httpUserAgent}}Swagger-Codegen/{{{moduleVersion}}}/perl{{/httpUserAgent}}';
 
 # authentication setting
 our $api_key = {};
diff --git a/samples/client/petstore/perl/lib/WWW/SwaggerClient/Configuration.pm b/samples/client/petstore/perl/lib/WWW/SwaggerClient/Configuration.pm
index fa58024872b..f5489e038b1 100644
--- a/samples/client/petstore/perl/lib/WWW/SwaggerClient/Configuration.pm
+++ b/samples/client/petstore/perl/lib/WWW/SwaggerClient/Configuration.pm
@@ -42,7 +42,7 @@ use constant VERSION => '1.0.0';
 
 # class/static variables
 our $http_timeout = 180;
-our $http_user_agent = 'Perl-Swagger';
+our $http_user_agent = 'Swagger-Codegen/1.0.0/perl';
 
 # authentication setting
 our $api_key = {};