Help for this page
#!/usr/bin/perl -w use strict; ... } "that's it!";
package main; use MyCwd; ... } print cwd, "\n";