use strict;
use warnings;
sub dothis ($:$$$) {
           ## rest of the code
}
__END__
Illegal character in prototype for main::dothis : $:$$$ at d:\tmp\test.pl line 3