#!/usr/bin/perl -w use strict; use MyModule2 qw(:All); printf "MyScript2/func3: >%s<\n",func3('$myscalar'); printf "MyScript2/func4: >%s<\n",func4('$myscalar');