#!/usr/bin/env perl
use warnings;
use strict;

my $nossl = 'foo';
mkdirs($nossl);
sub mkdirs {
    my $nossl = shift;
    print "nossl=$nossl\n";
}

##</code><code>##

nossl=foo