- or download this
my $my_DIR = dirname("$my_FILE");
my $my_tmp_file = basename("$my_FILE");
...
my @my_output = `echo "cd $my_DIR; $my_SCCS edit $my_tmp_file"`;
print "<h2>@my_output</h2><br>\n";
- or download this
"interfaces2.dat" [Read only] [Incomplete last line] 68307 lines, 2045
+312 characters (262672 null)
cd /data; /usr/ccs/bin/sccs edit interfaces2.dat
- or download this
my @my_output = `cd $my_DIR; /usr/ccs/bin/sccs edit $my_tmp_file`;
print "<h2>@my_output</h2><br>\n";