Skip to content

Commit 0640ab8

Browse files
committed
[css2] *** empty log message ***
--HG-- extra : convert_revision : svn%3A73dc7c4b-06e6-40f3-b4f7-9ed1dbc14bfc/trunk%40958
1 parent 34032b4 commit 0640ab8

2 files changed

Lines changed: 26 additions & 0 deletions

File tree

css2/bin/Attic/rmimgext

Lines changed: 13 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,13 @@
1+
#!/usr/local/bin/perl -w
2+
#
3+
# Removes extensions, such as .gif and .png from IMG links,
4+
# so that content negotiation gets a chance.
5+
#
6+
# Bert Bos <bert@w3.org>
7+
# $Id: rmimgext,v 2.1 1998-02-17 23:56:44 bbos Exp $
8+
9+
$/ = "<";
10+
while (<>) {
11+
s/^(img\b[^>]+?\bsrc\s*=\s*[\"\']?)([^>\s\"\']+)\.\w+/$1$2/ios;
12+
print;
13+
}

css2/bin/rmimgext

Lines changed: 13 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -0,0 +1,13 @@
1+
#!/usr/local/bin/perl -w
2+
#
3+
# Removes extensions, such as .gif and .png from IMG links,
4+
# so that content negotiation gets a chance.
5+
#
6+
# Bert Bos <bert@w3.org>
7+
# $Id: rmimgext,v 2.1 1998-02-17 23:56:44 bbos Exp $
8+
9+
$/ = "<";
10+
while (<>) {
11+
s/^(img\b[^>]+?\bsrc\s*=\s*[\"\']?)([^>\s\"\']+)\.\w+/$1$2/ios;
12+
print;
13+
}

0 commit comments

Comments
 (0)