Beefy Boxes and Bandwidth Generously Provided by pair Networks
Welcome to the Monastery
 
PerlMonks  

Re: If-else problem

by BigJoe (Curate)
on Jun 15, 2002 at 09:28 UTC ( #174822=note: print w/ replies, xml ) Need Help??


in reply to If-else problem

A quick look at 5:00 am (where I am from) I would make a change in you if statement from:
if ($attributes[0] =~m/Di*/){

To:

if ($attributes[0] =~m/Di*/i){
for case insensitvity.
one thing you can do to make it read a little clearer is to try this:
print <<EODUMP; <TABLE WIDTH=65% BORDER=2 ALIGN=CENTER> <TR BGCOLOR=#9999FF><B>Anuncio número $n del $attributes[0]</B></T +R> <TR>De <B>$attributes[1] $attributes[2]</B> que desea vender <FONT + COLOR=#003366><B>$attributes[6] a $attributes[7] €.</B></FONT></TR> <TR>Os podéis poner en contacto con el/ella en los teléfonos <B><F +ONT COLOR=#003366>$attributes[8] // $attributes[9]</B></FONT></TR> <TR>Según el horario que nos idica: <B><FONT COLOR=#003366>$attrib +utes[5]</B></FONT></TR> <TR>Su e-Mail es: <B>$attributes[10]</B> y su URL: <B>$attributes[ +11]</B></TR> <TR BGCOLOR=#FF9999><B>ESTOS SON SUS COMENTARIOS:</B> <BR><FONT COLOR=#333333><I><B>$attributes[12]</I></B></TR></FON +T> </TABLE> <BR><BR> EODUMP
By printing like this you can format your HTML a little more sanely.

--BigJoe

Learn patience, you must.
Young PerlMonk, craves Not these things.
Use the source Luke.


Comment on Re: If-else problem
Select or Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://174822]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others wandering the Monastery: (10)
As of 2014-10-23 07:08 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (124 votes), past polls