Another way would be to do:

#!/usr/bin/perl -w
BEGIN { push(@INC, '/home/giant/perl/mondules'); }
use strict;
use NET::Quake;
....
[download]

giant