Help for this page
$!/usr/bin/perl -w package library; #use block ... ... 1;
use library; my $object=new library($kernel); #$kernel is my parent object