git.shiar.nl
/
sheet.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
perl: release data for ubuntu versions
[sheet.git]
/
perl.plp
diff --git
a/perl.plp
b/perl.plp
index 6bc35863a83b03357dad72e358385221ec54ce85..5d544442f89b905f939a41b937e1082770e4da2e 100644
(file)
--- a/
perl.plp
+++ b/
perl.plp
@@
-2,7
+2,7
@@
Html({
title => 'perl version cheat sheet',
Html({
title => 'perl version cheat sheet',
- version => '
v
1.1',
+ version => '1.1',
keywords => [qw'
perl version feature features comparison
sheet cheat overview summary
keywords => [qw'
perl version feature features comparison
sheet cheat overview summary
@@
-33,13
+33,15
@@
for my $vernum (reverse sort keys %{$info}) {
my $title = 'experimental';
my $class = ' class="ex"';
if (ref \$experimental eq 'VSTRING') {
my $title = 'experimental';
my $class = ' class="ex"';
if (ref \$experimental eq 'VSTRING') {
+ my $dropped = $experimental =~ s/^\0//
+ and (exists $get{v} or next);
$title = sprintf('%s %vd',
$title = sprintf('%s %vd',
- $
experimental =~ s/^\0//
? 'removed in ' : "$title until",
+ $
dropped
? 'removed in ' : "$title until",
$experimental,
);
$experimental = $_->[3]; # optional additional class
}
$experimental,
);
$experimental = $_->[3]; # optional additional class
}
-
els
if ($experimental) {
+ if ($experimental) {
$class .= sprintf ' title="%s"', $experimental;
}
$_->[1] .= qq{ <em$class>($title)</em>};
$class .= sprintf ' title="%s"', $experimental;
}
$_->[1] .= qq{ <em$class>($title)</em>};