Παράδειγμα module (Φέρνοντας web σελίδες από το Internet)

#!/usr/bin/perl -w

use strict;

use LWP::Simple;

my $page = get ('http://www.flash.gr');

print "$page";

Όπως βλέπετε τα πράγματα είναι πολύ απλά.

Με τον τρόπο αυτό δηλώνουμε στην Perl ότι πρέπει να χρησιμοποιήσει το module LWP::Simple

Θεωρήσαμε πως όλη η σελίδα είναι μια scalar variable την οποία ονομάσαμε $page και ζητήσαμε το URL 'http://www.flash.gr'

Η print δεν έχει σχέση με το module, αλλά μια και φέραμε τη σελίδα την τυπώνουμε (στην οθόνη) για να βεβαιωθούμε ότι πράγματι έφτασε κανονικά. Εννοείται ότι αυτό που ήρθε είναι το html αρχείο και όχι η πλήρης σελίδα με τα γραφικά της ή με όποια άλλα objects (αντικείμενα) περιέχει.

Αν τώρα θέλουμε να αποθηκεύσουμε αυτή τη σελίδα σε ένα αρχείο τότε ο κώδικάς μας γίνεται:

Η σελίδα του IN.gr θα αποθηκευτεί στο αρχείο test.htm.