Author image Алексей Капранов
and 2 contributors


Device::Pertelian - a driver for the Pertelian X2040 USB LCD


If you have a Pertelian X2040 USB LCD screen, then you can do things with it.

    use Device::Pertelian;

    my $lcd = Device::Pertelian->new('/dev/ttyUSB0');

    # write to the top row
    $lcd->writeline(0, "Hello, world!");



The constructor accepts one parameter, $device, which is a path in /dev. You may find it out from your logs.


This function does a simple thing -- clears all the 4 lines of the screen.


This function takes two parameters, $row and $text. The screen has 4 rows, so you may pass a number from 0 to 3 as $row and the $text should be under 20 characters, that is the width of the screen.


Alex Kapranoff, <alex at>


Please report any bugs or feature requests to bug-device-pertelian at, or through the web interface at I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.


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

    perldoc Device::Pertelian

You can also look for information at:


See, and the pertd software that vanished with the main website


Copyright 2008 Alex Kapranoff, all rights reserved.

This program is released under the following license: GPL version 3

In the included pertd.tgz archive there is code by: Frans Meulenbroeks, Ron Lauzon, Pred S. Bundalo, Chmouel Boudjnah, W. Richard Stevens.

The code in pertd.tgz is either in Public Domain or available for distribution in unmodified form. See the relevant files.