# file bar.pl
use strict;
our $shared =~ s/e f/e half f/;