#!/usr/bin/perl -w
use strict;
... several other 'use' statements.

##</code><code>##

# I think the fake code problem is here:
some_sub('blah blah blah');
sub some_sub {
   do_something();
  &nbsl;do_something_else();
}

##</code><code>##

sub supporting_sub1 { ... code ... }
sub supporting_sub2 { ... code ... }