my $my_DIR = dirname("$my_FILE");
    my $my_tmp_file = basename("$my_FILE");

    my @my_output = `cd $my_DIR; $my_SCCS edit $my_tmp_file`;
    print "<h2>@my_output</h2><br>\n";

    my @my_output = `echo "cd $my_DIR; $my_SCCS edit $my_tmp_file"`;
    print "<h2>@my_output</h2><br>\n";

##</code><code>##

"interfaces2.dat" [Read only] [Incomplete last line] 68307 lines, 2045312 characters (262672 null)

cd /data; /usr/ccs/bin/sccs edit interfaces2.dat

##</code><code>##

    my @my_output = `cd $my_DIR; /usr/ccs/bin/sccs edit $my_tmp_file`;
    print "<h2>@my_output</h2><br>\n";