Select Code to Download

!/usr/bin/perl -w
use strict;
...
 ------------- 
$fullname is /home/eggie/tmp/tmp/foo/terminal.txt
$name is tmp/foo/terminal.txt