In the first place, you don't have a shared library. A shared library is an object language file that was compiled independently of your code and needs a special module e.g. P5NCI::Library to make it available to Perl (update: without writing unix hacker-level glue code yourself that is to say).

In the second place you also don't have a module - see perlmod for how to construct the Perl equivalent of a shared library. I presume you are loading the non-module routines.pl using require - that is really the Perl equivalent of a #INCLUDE in C.

The short answer to the question is "yes" because $hello is global BUT you don't really want to rely on global variables because then you make your "library" dependent on what is defined as global for particular main routines - that's not good code design. Better is to pass parameters to your "shared" subroutines, e.g.:

#!/usr/bin/perl
# main program;

use strict;
use warnings;
use Routines;;

{ # closure to avoid global variables
    my $hello = "hello123;

  # ...

    hello( $hello );    

}
__END__

# Routines.pm - a separate file called a "module"

package Routines;
sub hello {
    my $hello = shift;
    print "$hello\n";
}

1;
[download]