Sha256: e182d16d1f1e6d944790daf45c83ab6865192b9bc9105b5aabacb5c09a0edeca
Contents?: true
Size: 436 Bytes
Versions: 48
Compression:
Stored size: 436 Bytes
Contents
# Declare package 'Bob' with version
package Bob 4;
use strict;
use warnings;
use Exporter 'import';
our @EXPORT_OK = qw(hey);
sub hey {
my ($text) = @_;
if (uc($text) eq $text && $text =~ /\p{Uppercase}/) {
return 'Calm down, I know what I\'m doing!' if $text =~ /\?\s*$/;
return 'Whoa, chill out!';
}
return 'Fine. Be that way!' if $text =~ /^\s*$/;
return 'Sure.' if $text =~ /\?\s*$/;
return 'Whatever.';
}
1;
Version data entries
48 entries across 48 versions & 1 rubygems