<:
+use 5.014;
use utf8;
-use strict;
use warnings;
no warnings 'qw'; # you know what you doing
no warnings 'uninitialized'; # save some useless checks for more legible code
return join "\n", map { sprintf(
'<link rel="%s" type="text/css" media="all" href="%s" title="%s">',
- $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "/$_.css?1.8", $_
+ $_ eq $style ? 'stylesheet' : 'alternate stylesheet', "/$_.css?1.9", $_
) } @_;
}