#!/usr/bin/perl use common::sense; use xstest; my $obj = xstest::new(); say "object is: $obj";