CGI/Perl Guide | Learning Center | Forums | Advertise | Login
Site Search: in

  Main Index MAIN
INDEX
Search Posts SEARCH
POSTS
Who's Online WHO'S
ONLINE
Log in LOG
IN

Home: Perl Programming Help: Beginner: Re: [flaq1991] print doesn't work: Edit Log



Zhris
Enthusiast

Oct 31, 2013, 5:34 AM


Views: 1874
Re: [flaq1991] print doesn't work

Cover your code in debug print statements, this will make it easier to visualize its flow. Print something before the if statement to check it even reaches that far, if it does then print $response->content to check it contains what you think it does. Work your way backwards until you find the cause.


Code
print "DEBUG: before if 1\n\n\n"; 
print 'DEBUG: response content: ', $response->content, "\n\n\n";
if($response->content =~ m/Witaj w panelu twojego konta,/i) {
{
print "DEBUG: in if 1\n\n\n";
}
print "DEBUG: after if 1\n\n\n";


We cannot test your code easily to provide a definitive answer.

Chris


(This post was edited by Zhris on Oct 31, 2013, 5:38 AM)


Edit Log:
Post edited by Zhris (Enthusiast) on Oct 31, 2013, 5:38 AM


Search for (options) Powered by Gossamer Forum v.1.2.0

Web Applications & Managed Hosting Powered by Gossamer Threads
Visit our Mailing List Archives