Recover from microbel

This commit is contained in:
Kursmester
2025-03-05 12:33:13 +01:00
committed by h7x4
commit f46dae2dea
10 changed files with 2349 additions and 0 deletions

31
Hello.pl Normal file
View File

@@ -0,0 +1,31 @@
# Ny fil! Dette er "hils.pl"
package main; # Hoved-navnerommet heter "main", og trengs ikke <20>
# annonseres p<> denne m<>ten, egentlig. Med mindre vi
# har flere "package" i samme fil...
use Hello;
my $friend = Hello::person("Gorm", "M");
my @other_friends = (
Hello::person("Natalija", "K"),
Hello::person("Remi", "M") );
# Og s<> hilser vi po et par venner :)
Hello::hils( $friend );
Hello::hils( $other_friends[0] );
Hello::hils( $other_friends[1] );
Hello::hils( $friend );
Hello::hils( $other_friends[0] );
Hello::hils( $friend );
Hello::vis_ant_hilsninger( $friend );
Hello::vis_ant_hilsninger( $other_friends[0] );
Hello::vis_ant_hilsninger( $other_friends[1] );
__END__
Ferdig! Vi kunne ha f<>tt penere kode ved <20> importere symbolene fra
Hello.pm, men da mister vi fordelen av <20> vite n<>yaktig hvilken pakke
funksjonene h<>rer til i.