$ perl -e 'use MyProcedures qw(one two three); one(); two(); three();'
one
two
three