Beefy Boxes and Bandwidth Generously Provided by pair Networks
Don't ask to ask, just ask
 
PerlMonks  

Re: include file "inline"

by kutsu (Priest)
on Mar 06, 2006 at 19:28 UTC ( #534741=note: print w/ replies, xml ) Need Help??


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;

The key points being look at perltoot, bless, and perlobj


Comment on Re: include file "inline"
Select or Download Code
Replies are listed 'Oldest First'.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://534741]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (13)
As of 2015-07-07 16:19 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    The top three priorities of my open tasks are (in descending order of likelihood to be worked on) ...









    Results (91 votes), past polls