Frank Schönmann: Perl Module einbinden

Beitrag lesen

hi!

package modules;
sub database_read

»»  {
»»  open(DATABASE, "<$base");
»»  @base_datas = <DATABASE>;
»»  close DATABASE;
»»  }

1;

wenn ich das modul jetzt mit &modules::database_read; einbinde wird die datenbank nicht geoeffnet.....
ich vermute das der parameter ($base) nicht uebergeben wird......was kann ich dagegen machen ????

Den Paramter $base übergeben? Sag blos, du arbeitest mit globalen Variablen für sowas? Igitt, igitt...

=== cut ===
sub database_read
{
  my $base = shift;
  ...  
}
...
&modules::database_read($base);
=== cut ===

Standardmäßig sollten Modulnamen eigener Module übrigens mit Großbuchstaben beginnen, da Perl-eigene
komplett aus Kleinbuchstaben bestehen: perldoc perlstyle

bye, Frank!