Pravilno e tova koeto si mislish. Mnogo e lesno, ako mojesh da promenish vikashtite links da izvikvat vyprosnia universalen CGI s parametyr (v primera script.cgi?style=NUM), koito po kysno da izpolzvash vyv CGI.

Eto edno primerno reshenie (predpolagam che ti imash tvyrd broi CSSs):

use CGI;
my $q = new CGI;

my $style = ("/folder1/file1.css","/folder2/file2.css","/folder3/file3.css")[$q->param("style") - 1] if ($q->param("style") =~ /^\d|\d+$/);

#. . .

print qq~<link rel="stylesheet" href="$style" type="text/css">~;

#ili ako polzvash template

$template =~ s/PlaceHolderString/$style/g;


Razbira se ima oshte mnogo nachini da se napishe gornoto... az prosto ti davam prost rabotesht primer. Nadiavam se che si reshil problema veche :)