09-25-2008
It's a lazy coding hack used to prevent a syntax error in the event that $cid or $hot are not defined. The 'foo' part of the string doesn't prevent the match as grep ignores it. That said, it could actually cause it to break if $dow just happens to be "foo" (or some substring of it).
A tidier solution is to instead use "$cid" or to first evaluate "$cid" and check it's defined.
9 More Discussions You Might Find Interesting
1. Shell Programming and Scripting
Hello all,
I have a situation where I have a web root directory with a few thousand users spread out into 100 subdirectories in a 00/firstname.lastname, 01/firstname.lastname, etc. hierarchy. I suddenly need to make sure that each of these user directories contains a default index.html file... (6 Replies)
Discussion started by: dkaplowitz
6 Replies
2. Shell Programming and Scripting
I need a way to grep -v a list of times/date from the output of postqueue -p that are a few hours old, in order to remove them with postsuper -d.
Right now I have a script that is deleting the previous day of messages left in the queue, which runs once each day.
I want to clean up the job and... (1 Reply)
Discussion started by: DoneWithM$
1 Replies
3. Shell Programming and Scripting
Hallo,
I need to test a String (a special ip number-string).
So I want to run that:
ipadress=172.0.0.0
# for debugging:
echo $ipadress | egrep -e '172\.?\.??\.??$'
# the test that doesnt work
if test -z `echo $ipadress | egrep -e '172\.?\.??\.??$'` != ""
then
echo "match"
else... (1 Reply)
Discussion started by: wiseguy
1 Replies
4. Shell Programming and Scripting
I'm very very new to shell scripting (about 4 hours)
i've google'd till i can't google no more
is it possible to have store values in a config file .e.g
/etc/foo.conf
data=/home/
mount=/dev/sda1
size=1GB
and access these values from a shell script but also
be able to use... (3 Replies)
Discussion started by: xpd259
3 Replies
5. Shell Programming and Scripting
Suppose I have a text file that contains the tags <foo> and <bar>. The text file can have unlimted occurances of <foo> and <bar> and looks somthing like this:
<foo>
Some
Text
<foo>
Some
Text
<bar>
Some
Text
<foo>
Some (1 Reply)
Discussion started by: ArterialTool
1 Replies
6. UNIX for Dummies Questions & Answers
Hi:
How can I remove my own post?
Thanks. (2 Replies)
Discussion started by: phil518
2 Replies
7. UNIX for Dummies Questions & Answers
I'm not all that much of a newbie but I've not encountered this before. Happens both in Cygwin and in Mac OS X (Darwin):
cp -R /path/to/foo/.* /path/to/bar
(where directory 'bar' exists)
... seems to copy not only the contents of directory 'foo', but also other directories that are... (3 Replies)
Discussion started by: ChapHarrison
3 Replies
8. UNIX for Dummies Questions & Answers
Sometimes it works for me and sometimes I get this error:
syntax error on line 1, teletype
Basically I've got no idea whats going on, especially at the end of the command: bc
Any help is appreciated (1 Reply)
Discussion started by: phunkypants
1 Replies
9. Shell Programming and Scripting
I am writing a BASH script to update a webserver and then restart Apache. It looks basically like this:
#!/bin/bash
rsync /path/on/local/machine/ foo.com:path/on/remote/machine/
ssh foo.com sudo /etc/init.d/apache2 reloadrsync and ssh don't prompt for a password, because I have DSA encryption... (9 Replies)
Discussion started by: fluoborate
9 Replies
LEARN ABOUT DEBIAN
html::rewriteattributes
HTML::RewriteAttributes(3pm) User Contributed Perl Documentation HTML::RewriteAttributes(3pm)
NAME
HTML::RewriteAttributes - concise attribute rewriting
SYNOPSIS
$html = HTML::RewriteAttributes->rewrite($html, sub {
my ($tag, $attr, $value) = @_;
# delete any attribute that mentions..
return if $value =~ /COBOL/i;
$value =~ s/rocks/rules/g;
return $value;
});
# writing some HTML email I see..
$html = HTML::RewriteAttributes::Resources->rewrite($html, sub {
my $uri = shift;
my $content = render_template($uri);
my $cid = generate_cid_from($content);
$mime->attach($cid => content);
return "cid:$cid";
});
# up for some HTML::ResolveLink?
$html = HTML::RewriteAttributes::Links->rewrite($html, "http://search.cpan.org");
# or perhaps HTML::LinkExtor?
HTML::RewriteAttributes::Links->rewrite($html, sub {
my ($tag, $attr, $value) = @_;
push @links, $value;
$value;
});
DESCRIPTION
"HTML::RewriteAttributes" is designed for simple yet powerful HTML attribute rewriting.
You simply specify a callback to run for each attribute and we do the rest for you.
This module is designed to be subclassable to make handling special cases eaiser. See the source for methods you can override.
METHODS
"new"
You don't need to call "new" explicitly - it's done in "rewrite". It takes no arguments.
"rewrite" HTML, callback -> HTML
This is the main interface of the module. You pass in some HTML and a callback, the callback is invoked potentially many times, and you get
back some similar HTML.
The callback receives as arguments the tag name, the attribute name, and the attribute value (though subclasses may override this --
HTML::RewriteAttributes::Resources does). Return "undef" to remove the attribute, or any other value to set the value of the attribute.
SEE ALSO
HTML::Parser, HTML::ResolveLink, Email::MIME::CreateHTML, HTML::LinkExtor
THANKS
Some code was inspired by, and tests borrowed from, Miyagawa's HTML::ResolveLink.
AUTHOR
Shawn M Moore, "<sartak@bestpractical.com>"
LICENSE
Copyright 2008-2010 Best Practical Solutions, LLC. HTML::RewriteAttributes is distributed under the same terms as Perl itself.
perl v5.10.1 2010-11-18 HTML::RewriteAttributes(3pm)