#!/usr/bin/perl -l

BEGIN {
    $|  = 1;
}

use autodie;
use common::sense;
use Opcode;
use Opcodes qw/ppaddr opdesc/;

my $ppaddr = &Opcodes::ppaddr(0);
print $ppaddr;

my $opdesc = &Opcodes::opdesc(0);
print $opdesc;