#!/usr/bin/perl -w
###########################################
# dagobert - Money Counting Interpreter
# Mike Schilli, 2004 (m@perlmeister.com)
###########################################
use strict;

use Plugger;
my $string = join '', <>;

my $plugger = Plugger->new();
$plugger->init();
$plugger->parse($string);