use warnings;
use strict;
use feature 'say';
use foo qw/$bar/;

say $bar;