#!/usr/bin/perl
use Book;
my $book = Book->new();
$book->run();