use subs 'system','chdir','glob';

glob; chdir; system;

sub system {print "system\n"}
sub chdir { print "chdir\n" }
sub glob { print "glob\n" }