push (@styleck, $style); $netdriver_stylesheet = $stl -> cookie ( -name => 'netdriver_stylesheet', -value => $style, ); print $stl -> header (-cookie => $netdriver_stylesheet); #### @preference = $page -> cookie('netdriver_stylesheet'); if (@preference[0] ne "") { $style = "@preference[0]"; } else { $style = "driver"; }