tracks/perl6/exercises/phone-number/example.yaml in trackler-2.2.1.53 vs tracks/perl6/exercises/phone-number/example.yaml in trackler-2.2.1.54
- old
+ new
@@ -1,22 +1,22 @@
exercise: Phone
version: 3
plan: 14
imports: '&clean-number'
-tests: |
+tests: |-
for @($c-data<cases>[0]<cases>) {
if .<expected> {
is clean-number(.<phrase>), |.<expected description>;
} else {
nok clean-number(.<phrase>), .<description>;
}
}
unit: module
-example: |
+example: |-
sub clean-number ($number is copy) is export {
$number ~~ s:g/<:!Nd>//;
$number ~~ /^ 1? ( [ <[2..9]> <:Nd> ** 2 ] ** 2 <:Nd> ** 4 ) $/ ?? ~$0 !! Nil;
}
-stub: |
+stub: |-
sub clean-number ($number) is export {
}