#!/usr/bin/perl $|++; use strict; use warnings; use FindBin; use File::Spec; # Verzeichnis / Ordner fuer eigene Module einbinden my $lib_dir = File::Spec->catdir($FindBin::Bin, 'mylibs'); unshift(@INC,$lib_dir); # Eignes Modul "laden" require MyFirstModul; # MyFirstModul.pm gespeichert in /wo_das_Script_ist/mylibs # Eigenes Modul einbinden my $lets_do = new MyFirstModul; # Daten am Anfang + Ausgabe my $string = 'Hallo World'; print $string . "\n"; # Modul benutzen => Daten aendern + Ausgabe my $new_string = $lets_do->replace($string); print $new_string . "\n";