Skip to content

DEV Community

Discussion on: Daily Challenge #1 - String Peeler

View post

Replies for: Perl? $testing = "Happy coding!"; print &peeler($testing) . "\n"; sub peeler { my $str = shift; if(length($str) > 2) { r...

E. Choroba • Jul 3 '19

Or maybe just

sub peeler { shift =~ s/^.|.$//gr }