in reply to include file "inline"
Since everyone else has meantioned how to inline perl code, and seeing the use SOME::Module; and OOish construct, I'm assuming you might be asking how to create an OO module. If that's the case your half way there:
The calling perl file (ie. foo.pl)
#!/usr/bin/perl use warnings; use strict; @data = qw(gotta have guts to code perl); use Guts; my $Gs = Guts->new; $Gs->gutsy(@data);
The module (ie. Guts.pm):
pakage Guts; sub new { my $class = shift; my $self = {}; $self = bless($self, $class); return $self; } sub gutsy { $self = shift; print join(" ", @_); } 1;
In Section
Seekers of Perl Wisdom