AndyA · August 30, 2017 18:20
diff --git a/second-colon.pl b/second-colon.pl
 #!/usr/bin/env perl

 use v5.10;

 use autodie;
 use strict;
 use warnings;

 my $str = "Arts: Culture Fix: Classical Architecture";

 die unless $str =~ /^.*?:.*?:\s*(.*)$/;

 say $1;
	#!/usr/bin/env perl

	use v5.10;

	use autodie;
	use strict;
	use warnings;

	my $str = "Arts: Culture Fix: Classical Architecture";

	die unless $str =~ /^.?:.?:\s(.)$/;

	say $1;