die "..." 
      if $string =~ /:|.{17}/;

##</code><code>##

>perl -wMstrict -le
"my $string = 'foo';
 ;;
 die '...' if $string =~ /:|.{17}/;
 ;;
 print qq{processing '$string'};
"
processing 'foo'