#!/usr/bin/perl
# vim: set ts=4 sw=4 et sta:
use strict;
use warnings;

use bar qw( bar1 );


print bar1(), $/;