Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW
 
PerlMonks  

Google Adsense ads in a Tk app.

by Anonymous Monk
on Mar 20, 2010 at 19:30 UTC ( [id://829842]=perlquestion: print w/replies, xml ) Need Help??

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

I am looking for a way to put Google Adsense ads in my Tk apps, so I can do so free software thing and still make a little money, without charging for my software. I can't find anything about adding adsense ads to a tk app. Anybody have any thoughts? A purely perl implementation is preffered.
If there is not a better (pure perl) solution, my current implementation uses Win32::IE::Mechanize and an html page with a single adsense banner on it.

Win32::IE::Mechanize can grab the URL of the image and the href URL. The image can be displayed using Tk::Photo, but I am not sure of the bext method to display the actual ad webpage, I am currently using Win32::IE::Mechanize to fire up Internet Explorer and goto the URL of the ad.

This works fine for most, but if IE is not the default browser some may complain.

Replies are listed 'Best First'.
Re: Google Adsense ads in a Tk app.
by moritz (Cardinal) on Mar 20, 2010 at 22:30 UTC
    Last I looked (which is admittedly about 1.5 years ago) Adsense was only support for HTML pages and RSS feeds, not applications. So unless something changed in the mean time, you can't.
    Perl 6 - links to (nearly) everything that is Perl 6.
Re: Google Adsense ads in a Tk app.
by lamprecht (Friar) on Mar 20, 2010 at 21:45 UTC
    Hi,

    you can use the start command to invoke the default browser:

     perl -e "system ('start', '/B','http:/perlmonks.org')"

    See start /? for options and explanation of the /B switch


    Cheers, Chris
Re: Google Adsense ads in a Tk app.
by belg4mit (Prior) on Mar 23, 2010 at 00:24 UTC
    Eww, adware. As moritz suggests, you should check the TOS. If you really want to go this route, you could try JE.

    --
    In Bob We Trust, All Others Bring Data.

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://829842]
Approved by LanX
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others admiring the Monastery: (6)
As of 2024-04-23 10:23 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found