exporter? (Allgemeines zu Perl)

[thread]7064[/thread]

exporter?

esskar

2005-06-21 03:44

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

Hi.
hab das irgendwie noch nicht genutzt:

Code: (dl )

use Foo qw/-bar/;

wie kann ich jetzt in Foo festellen, das -bar gesagt wurde?
und geht folgendes?

Code: (dl )

use Foo qw/-bar => 'foo'/;

wenn ja, wie?

schonmal danke!

sri

2005-06-21 04:13

User since
2004-01-29
828 Artikel
BenutzerIn

Das hat nix mit Exporter zu tun...

Code: (dl )

use Foo qw/1 2 3/;

package Foo;

sub import {
    my ( $class, @args ) = @_;
    # @args = (1, 2, 3);
}

Die Daten werden einfach von use an import durchgereicht. (perldoc -f use)\n\n

esskar

2005-06-21 12:24

User since
2003-08-04
7321 Artikel
ModeratorIn

user image

aha... danke!