Saving current state of code, and adding test script i'm using. just put the new module with its peers (/usr/share/perl5/Business/...)

1 files changed, 2 insertions, 1 deletions

diff --git a/test.pl b/test.pl
index 22124bd..4c76fd8 100644
--- a/test.pl
+++ b/test.pl
@@ -14,7 +14,8 @@ my %opt = (
     gid => '1432479912596791',
     tid => '01',
     userid=> 'tom@yiptv.com',
-    port => 443
+    port => 443,
+    env => 'test'
 );