############################################################################################################################
############################################################################################################################
-&Header::openbox('100%', 'center', $Lang::tr{'extrahd'});
open( FILE, "< $devicefile" ) or die "Unable to read $devicefile";
@devices = <FILE>;
close FILE;
</table>
END
;
-
-&Header::closebox();
-
&Header::openbox('100%', 'center', $Lang::tr{'extrahd detected drives'});
print <<END
<table border='0' width='600' cellspacing="0">