Zane C. Bowers-Hadley > X11-Resolution-0.0.0 > X11::Resolution

Download:
X11-Resolution-0.0.0.tar.gz

Dependencies

Annotate this POD

View/Report Bugs
Module Version: 0.0.0   Source  

NAME ^

X11::Resolution - Get information on the current resolution for X.

VERSION ^

Version 0.0.0

SYNOPSIS ^

    use X11::Resolution;

    my $xres=X11::Resolution->new();
    if($xres->{error}){
         print "Error:".$xres->{error}.": ".$xres->{errorString}."\n";
    }

    #gets it currently the current screen
    my ($x, $y)=$xres->getResolution;
    if($xres->{error}){
         print "Error:".$xres->{error}.": ".$xres->{errorString}."\n";
    }
    print "x=".$x."\ny=".$y."\n";

    #gets it for screen zero
    my ($x, $y)=$xres->getResolution(0);
    if($xres->{error}){
         print "Error:".$xres->{error}.": ".$xres->{errorString}."\n";
    }
    print "x=".$x."\ny=".$y."\n";

methodes ^

new

This initiates the object.

    my $xres=X11::Resolution->new();
    if($xres->{error}){
         print "Error:".$xres->{error}.": ".$xres->{errorString}."\n";
    }

getResolution

This fetches the resolution for the current or a given screen.

    #gets it currently the current screen
    my ($x, $y)=$xres->getResolution;
    if($xres->{error}){
         print "Error:".$xres->{error}.": ".$xres->{errorString}."\n";
    }
    print "x=".$x."\ny=".$y."\n";

    #gets it for screen zero
    my ($x, $y)=$xres->getResolution(0);
    if($xres->{error}){
         print "Error:".$xres->{error}.": ".$xres->{errorString}."\n";
    }
    print "x=".$x."\ny=".$y."\n";

errorBlank

This is a internal function and should not be called.

ERROR CODES ^

1

No enviromental variable 'DISPLAY' listed.

2

None existant display.

AUTHOR ^

Zane C. Bowers, <vvelox at vvelox.net>

BUGS ^

Please report any bugs or feature requests to bug-x11-resolution at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=X11-Resolution. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT ^

You can find documentation for this module with the perldoc command.

    perldoc X11::Resolution

You can also look for information at:

ACKNOWLEDGEMENTS ^

COPYRIGHT & LICENSE ^

Copyright 2009 Zane C. Bowers, all rights reserved.

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.

syntax highlighting: