bar();

sub bar {
   (print STDERR "miscellanea") if ( (int rand(10) > 5 );
   1;
}