#!/usr/bin/perl
use strict; use warnings;
use Net::Lorcon qw(:all);
my @cards = Net::Lorcon::getcardlist();
use Data::Dumper;
print Dumper(\@cards);
#!/usr/bin/perl
use strict; use warnings;
use Net::Lorcon qw(:all);
my @cards = Net::Lorcon::getcardlist();
use Data::Dumper;
print Dumper(\@cards);