Die `use`-Anweisung

testpasswd2.pl

#!/usr/local/bin/perl -w use Passwd2; (my $cmdname = $0) =~ s{.*/}{}; die "Usage: $cmdname login\n" unless @ARGV == 1; my $pwentry = getpwent_by_login($ARGV[0]); if (defined $pwentry) { print "Name: $pwentry->{name}\n"; print "UID: $pwentry->{uid}\n"; print "GID: $pwentry->{gid}\n"; } else { print "$ARGV[0] ist unbekannt!\n"; }

Wenn nicht nur das Modul zur Verfügung stehen soll, sondern auch Namen in den eigenen Namensraum zu übernehmen sind, wird use anstatt von require verwendet.

Entsprechend lässt sich nachher getpwent_by_login ohne weitere Qualifizierung verwenden.

Von dieser Technik sollte nur sehr zurückhaltend Gebrauch gemacht werden, um Namenskollisionen zu vermeiden.

Es gibt Techniken zur partiellen Übernahme von Namen, auf die hier nicht weiter eingegangen wird. Weitere Informationen in der perlmod-Manualseite. Ein sehr umfangreiches Beispiel dafür ist das bei Perl mitgelieferte Modul POSIX.

	Wenn nicht nur das Modul zur Verfügung stehen soll, sondern auch Namen in den eigenen Namensraum zu übernehmen sind, wird `use` anstatt von `require` verwendet.
	Entsprechend lässt sich nachher `getpwent_by_login` ohne weitere Qualifizierung verwenden.
	Von dieser Technik sollte nur sehr zurückhaltend Gebrauch gemacht werden, um Namenskollisionen zu vermeiden.
	Es gibt Techniken zur partiellen Übernahme von Namen, auf die hier nicht weiter eingegangen wird. Weitere Informationen in der perlmod-Manualseite. Ein sehr umfangreiches Beispiel dafür ist das bei Perl mitgelieferte Modul `POSIX`.

Die use-Anweisung

Die `use`-Anweisung