It sounds like overrideredirect is what you need. ( strat++ ) On a side note: back slashes are not interpolated inside single quotes, so that file won't exist.

use Tk;
use Tk::Photo;
use Tk::JPEG;
my $mw=new MainWindow;

$mw->geometry('+200+200');
$mw->overrideredirect(1); 
my $image = '
R0lGODlhLAHIAIAAAAAAAP///yH5BAAAAAAALAAAAAAsAcgAAAL/jI+py+0Po5y02ouz3r
+z7D4bi
SJbmiabqyrbuC8fyTNf2jef6zvf+DwwKh8Si8YhMKpfMpvMJjUqn1Kr1is1qt9yu9wsOi8
+fksvmM
TqvX7Lb7DY/L5/S6/Y7P6/f8vv8PGCg4SFhoeIiYqLjI2Oj4CBkpOUlZaXmJmam5ydnp+Q
+kaKjpK
Wmp6ipqqusra6voKGys7S1tre4ubq7vL2+v7CxwsPExcbHyMnKy8zNyMCADgTAYtPUZdHX
+adAM3d
rf3gHR598L09jlAu3i1RbtCu3U5+vsDNoL4OHh9Q734fr79vnpF3/gCiK3iwAcGDCCOke5
+jQnkBz
E/v5c0jwXEF+/xHpVRyyUKIFgCQnfivJTiDHfh0VoDTIcuTJmQ5CelRi0wNKkeZaZlgZja
+Y8hR+v
wQyIgd9KpERdfmSKJOO9CyUbttxIAV5QjSqx3ozZNKk3pzVNPj3q45/VCVUv9mQ4NSW5oV
+Atun1L
l6dYtWXJ6j2C1ifGsF8FEx6s1Z3fwj4NBj5sOK9kvICf/pV7WfDjx0hP1gW7WF5cxlSLWs
+5JeaBZ
yIMzT667k+1D1I3Xppbp+nXsyk5ttyated5Gyx67Vtz9OTJn4Hbvinauuri60qx1G59egW
+9oyo61
/zzru3k4bOTLmz+PPr369ezbu38PP778+fTr22c/+r6Q8Pp5eP/vsRRF2MEljmwQeCXggM
+EJ9Zp1
+WGUH4IEjndbcjoEOCGFzxWIGVESBvThZwHOdtlwWd01nFnQSUQcDdQgN9lyzEUGmoXWiV
+YihhDl
xmODN8743A9GgZcjBzB1V+GPGNb44o4+UpdPX0m2FURiM842VnbEIUljcllCNqRwXX1wFJ
+fKEVnl
mL09qGCHPToJHD5S5sURnBym9GWXUrUZlZoJavikgXOSZuZQSzIp5jh2AnogozXexl8Rvs
+1kmpFb
nuZnnIoitxCcSfb4aHAMOREiidtBWV2MmIamY6ZB0shZmaumdqhFQqLp4Jp3NhpXin/yiS
+Wtpl33
YJT5lKpiWS2ZytCdmNJlKCevA4YIYrEWyunpgnwae6y1aulTa3/ijktuueaei2666q7Lbr
+vuvgtv
vPLOS2+99t6Lb7767stvv/7+C3DAAg9McMEGH4xwwgovzHDDDj8MccQST0xxxRZfjHHGGm
+/Mccce
fwxyyCKPTHLJJp+Mcsoqr8xyyy6/DHPMMs9Mc80234xzzjrvzHPPPv8MdNBCX1AAADs=
';

my $foto = $mw->Photo( -data => $image );
$mw->Button(-image => $foto, -command => sub{ $mw->destroy })->pack();
MainLoop;

[download]

In reply to Re: TK without titlebar / Chromeless TK by thundergnat
in thread TK without titlebar / Chromeless TK by mdog

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.