Help for this page
package functions; use strict; ... } 1;
#!/usr/bin/perl ... functions::printsomething();