diff --git a/tutorial/perl/PerlClient.pl b/tutorial/perl/PerlClient.pl
index ad9c1d6..10cb725 100644
--- a/tutorial/perl/PerlClient.pl
+++ b/tutorial/perl/PerlClient.pl
@@ -12,9 +12,9 @@
 use Thrift::BufferedTransport;
 
 use SharedService;
-use shared_types;
 use Calculator;
-use tutorial_types;
+use shared::Types;
+use tutorial::Types;
 
 use Data::Dumper;
 
diff --git a/tutorial/shared.thrift b/tutorial/shared.thrift
index 7596376..1ecfb0a 100755
--- a/tutorial/shared.thrift
+++ b/tutorial/shared.thrift
@@ -7,6 +7,7 @@
 
 cpp_namespace shared
 java_package shared
+perl_package shared
 
 struct SharedStruct {
   1: i32 key
diff --git a/tutorial/tutorial.thrift b/tutorial/tutorial.thrift
index 1cff343..8af016a 100644
--- a/tutorial/tutorial.thrift
+++ b/tutorial/tutorial.thrift
@@ -47,6 +47,7 @@
 cpp_namespace tutorial
 java_package tutorial
 php_namespace tutorial
+perl_package tutorial
 
 /**
  * Thrift lets you do typedefs to get pretty names for your types. Standard