perlsub. Even perlintro! (Spend 20 minutes reading perldoc perlintro before your next question.)

One thing to note: Probably the best way to pass a regular expression to your subroutine is to pass a regexp object, obtained using the qr// operator described in perlop. Example:

sub test_match {
  my( $regexp, $string ) = @_;
  return scalar( $string =~ $regexp );
}

my $string = "Hello world!\n";
print $string if test_match( qr/hello/i, $string );
[download]

:) In addtion to perlintro#Writing subroutines read Beginning Perl
Learn Perl in about 2 hours 30 minutes
perlintro
chromatics free book Modern Perl a loose description of how experienced and effective Perl 5 programmers work....You can learn this too.
PLEAC - Programming Language Examples Alike Cookbook
Re: need help! ( alike and beginners best codes computer cookbook do examples exercises for general getting go i is language life master modules next other people's perl PLEAC problems programming reading real science solve started the to w
http://rosettacode.org/wiki/Function_parameter#Perl

That's hard to believe! :)

Putting your headline into google leads to plenty of hits, among them perlsub

example:

sub extract{
  my ($filename, $filepath, $regex) = @_;

  # do stuff

}
[download]

G'day MoniqueLT,

You've received good advice on writing a subroutine; however, I noticed you actually wrote: "... I would like to make a method ...".

If you want to code:

$object->method_name($param1, $param2, $param3);
[download]

Then your subroutine definition will typically look more like this:

sub method_name {
    my ($self, $param1, $param2, $param3) = @_;
    ...
}
[download]

See "perlootut - Object-Oriented Programming in Perl Tutorial" for a general discussion and the Methods section for specifics.