use strict;
use warnings;

package Str;
package main;
my Str $name = 'David';

print "Hello, my name is $name\n";
[download]

Also #2 could be solved with a use package exporting those variables.

edit

And if exporting isn't wanted one might even try to declare them in the callers package when import is executed.

update

Done -> Re: perl 5 suggestions? (hack it yourself)

Cheers Rolf
_{(addicted to the Perl Programming Language and ☆☆☆☆ :)
Je suis Charlie!}

allow adding specific variables to no strict 'vars';

I'd be interested to know your use case for this - care to share? None springs to mind.

I thought the same thing. I mean, it just feels like a way to do something where there's most certainly a better and safer way.

The first one doesn't really make sense to me, but there is a way you can disable strict 'vars' for specific areas of your code (I've never had a need for no strict 'vars'; before personally, usually no strict 'refs';). Note that all variables outside of the tiny scope (block) that the no strict ... is in is still under the enforcement of strict 'vars', ie. you need to pre-define before using them.

use warnings;
use strict;

{
    no strict 'vars';
    $x = 10; # look Ma, no 'my'!
    print "$x\n";
}
[download]

This hack shows how to define ONE module (here "Classy" YMMV) which creates as many types and package variables in the callers package as you want to.

use strict;
use warnings;
use lib '.';

use Classy ;

my Str $a ="Goliath";       # no compilation error

$var //= 'Philistine';      # no compilation error

print $var;
[download]

module

package Classy;
use strict;
use warnings;


sub import {
    my $pkg = (caller())[0];
    eval 'require Str';
    
    no strict 'refs';

    *{"${pkg}::var"} = \(my $var);
    

}

1;
[download]