On Fri, Nov 08, 2002 at 02:17:10PM -0500, Richard Lister wrote:
> I solve it in the following clunky manner:
> 
>   my $screen;
> 
>   open(XWININFO, "xwininfo -root|") || die "can't run xwininfo";
>   while ( <XWININFO> ) {
>     $screen->{w} = $1 if /Width:\s*(\d+)/;
>     $screen->{h} = $1 if /Height:\s*(\d+)/;
>   }
>   close(XWININFO);
> 
> I would love a better solution if anyone has one :-)
> 
> Cheers
> Ric

Thank you! this is exactly what I needed.

-peter =)

-- 
Peter McAlpine
[EMAIL PROTECTED]
--
Visit the official FVWM web page at <URL: http://www.fvwm.org/>.
To unsubscribe from the list, send "unsubscribe fvwm" in the body of a
message to [EMAIL PROTECTED]
To report problems, send mail to [EMAIL PROTECTED]

Reply via email to