#!/usr/bin/perl -w use modul; $r = modul->new;