learning-perl6/ch4/ex4-2.raku

8 lines
133 B
Raku
Raw Permalink Normal View History

2023-11-21 15:44:50 +00:00
sub MAIN () {
my $bjort = "a";
while $bjort {
$bjort = prompt "Provide a string to count the chars";
say $bjort.chars;
}
}