fork download
copy 
  1. my $string = 'this is a string of text'; 
  2. $string ~~ s/\b(\w+)\b/ucfirst($1)/ge; 
  3. print "$string\n";
Compilation error #stdin compilation error #stdout 0s 0KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
===SORRY!===
Unsupported use of /g; in Perl 6 please use :g at line 2, near "e; \nprint "
stdout
copy 
Standard output is empty
https://ideone.com/cW1mY
language:
Perl (perl 2018.12)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!