20 lines
247 B
Raku
Executable File
20 lines
247 B
Raku
Executable File
#!/usr/bin/env perl6
|
|
use v6.c;
|
|
|
|
sub greet2($name) {
|
|
say "how are you, $name?";
|
|
}
|
|
|
|
sub bye() {
|
|
say "ok bye!";
|
|
}
|
|
|
|
sub greet($name) {
|
|
say "hello, $name!";
|
|
greet2 $name;
|
|
say "getting ready to say bye...";
|
|
bye;
|
|
}
|
|
|
|
greet "adit";
|