use GPGWrapper;
use strict;

my $data = "Hello World!\n";
my $user = "Ton";
print $data;
$data = GPG_Encrypt_Asym($user, $data);
print $data;
$data = GPG_Decrypt_Asym($data);
print "\n$data\n";

$data = GPG_Encrypt('dumb password', $data);
print $data;
$data = GPG_Decrypt('dumb password', $data);
print "\n$data\n";