1 files changed, 16 insertions, 0 deletions
diff --git a/other/getsecure.pl b/other/getsecure.pl
new file mode 100755
index 0000000..1228295
--- /dev/null
+++ b/other/getsecure.pl
@@ -0,0 +1,16 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+use Data::Dumper 'Dumper';
+$|++;
+
+our %S;
+require "../common/supportedgames.pl";
+require "../common/auth.pl";
+
+my $gamename = "ut";
+my $secure   = "wookie",
+my $enctype  = 0;
+
+print Dumper get_validate_string($S{game}->{$gamename}->{key}, $secure, $enctype);