1 #!/usr/bin/perl -w 2 # File: current_working_directory.pl 3 # Author: Tom Large - tlarge@thelug.org 4 # Location: http://www.thelug.org/docs/ 5 # Description: How to find out what directory you're in. 6 7 use Cwd; 8 9 $dir = cwd(); 10 11 print $dir;