Sha256: d93d45403ee1f8b59879944a34c6451502ed7b3e08fb7549b7d1430fbfc2780e
Contents?: true
Size: 665 Bytes
Versions: 8
Compression:
Stored size: 665 Bytes
Contents
#!/usr/bin/env perl6
use v6;
use Test;
use lib IO::Path.new($?FILE).parent.path;
plan 7;
BEGIN {
my $module = %*ENV{'EXERCISM'} ?? 'Example' !! 'Robot';
EVAL("use $module");
};
pass 'Load module';
ok Robot.can('name'), 'Robot class has name attribute';
ok Robot.can('reset_name'), 'Robot class has reset_name method';
my $robot = Robot.new;
my $name = $robot.name;
like $name, /^^<[A..Z]>**2 <[0..9]>**3$$/, 'Name should match schema';
is $name, $robot.name, 'Name should be persistent';
ok $robot.name ne Robot.new.name, 'Robots should have different names';
$robot.reset_name;
ok $robot.name ne $name, 'reset_name should change the robot name';
Version data entries
8 entries across 8 versions & 1 rubygems