|
|
#!/usr/bin/perl -w | #!/usr/bin/perl -w |
|
use locale; |
my $vernr = "0.9.1"; | my $vernr = "0.9.1"; |
my $monthshort = "Jan"; | my $monthshort = "Jan"; |
|
|
'<html> | '<html> |
<head> | <head> |
|
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1"> |
<title>%%title%%</title> | <title>%%title%%</title> |
</head> | </head> |
|
|
${ $STYLESHEET{'html-nobg'}} {'template'} = '<html> | ${ $STYLESHEET{'html-nobg'}} {'template'} = '<html> |
<head> | <head> |
|
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1"> |
<title>%%title%%</title> | <title>%%title%%</title> |
</head> | </head> |
|
|
${ $STYLESHEET{'html-dark'}} {'template'} = '<html> | ${ $STYLESHEET{'html-dark'}} {'template'} = '<html> |
<head> | <head> |
|
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1"> |
<title>%%title%%</title> | <title>%%title%%</title> |
</head> | </head> |
|
|
${ $STYLESHEET{'html-simple'}} {'template'} = '<html> | ${ $STYLESHEET{'html-simple'}} {'template'} = '<html> |
<head> | <head> |
|
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1"> |
<title>%%title%%</title> | <title>%%title%%</title> |
</head> | </head> |
|
|
${ $STYLESHEET{'html-fntlck'}} {'template'} = '<html> | ${ $STYLESHEET{'html-fntlck'}} {'template'} = '<html> |
<head> | <head> |
|
<meta http-equiv="Content-Type" content="text/html; charset=ISO-8859-1"> |
<title>%%title%%</title> | <title>%%title%%</title> |
</head> | </head> |
|
|
{ | { |
'name' => 'Identifiers', | 'name' => 'Identifiers', |
'regex' => '\\b[a-zA-Z][a-zA-Z0-9_]*\\b', |
'regex' => '\\b[[:alpha:]](?:_?[^\W_])*\\b', |
'style' => 'identifier', | 'style' => 'identifier', |
'childregex' => [] | 'childregex' => [] |