Wie kann ich ein Perl 6-Modul in derselben Datei wie das Programm deklarieren und verwenden?

Question

Manchmal möchte ich keine mehrfachen Dateien, besonders wenn ich mit einer Idee herumspiele, dass ich eine nette Struktur behalten möchte, die später etwas werden kann. Ich möchte so etwas wie dies tun:

module Foo { 
    sub foo (Int:D $number) is export { 
     say "In Foo"; 
     } 
    } 

foo(137); 

das Lauf, erhalte ich einen Kompilierungsfehler (was meiner Meinung nach ein wenig seltsam für eine dynamische Sprache ist):

===SORRY!=== Error while compiling /Users/brian/Desktop/multi.pl 
Undeclared routine: 
    foo used at line 9 

the Perl 6 "Modules" documentation Lesen, I sehe keine Möglichkeit, dies zu tun, da die verschiedenen Verben in einer bestimmten Datei suchen wollen.

Answer 1

Unterprogramm-Deklarationen sind lexikalisch, so dass &foo außerhalb des Modulkörpers unsichtbar ist. Sie benötigen eine Import-Anweisung zu der Hauptstrecke Code hinzufügen, um es sichtbar zu machen:

module Foo { 
    sub foo (Int:D $number) is export { ... } 
} 

import Foo; 
foo(137); 

Nur für das Protokoll, können Sie auch manuell eine &foo Variable in der Hauptstrecke erklären und dass aus dem Modul zugeordnet werden:

my &foo; 

module Foo { 
    sub foo (Int:D $number) { ... } # no export necessary 

    &OUTER::foo = &foo; 
} 

foo(137);