package bar; use strict; use warnings; use base 'Exporter'; our @EXPORT_OK = qw( bar1 bar2 ); sub bar1 { return "bar1 was called."; } sub bar2 { return "bar2 was called."; } 1;