1Vte(3) User Contributed Perl Documentation Vte(3)
2
3
4
6 Gnome2::Vte - Perl interface to the Virtual Terminal Emulation library
7
9 use strict;
10 use Glib qw(TRUE FALSE);
11 use Gtk2 -init;
12 use Gnome2::Vte;
13
14 # create things
15 my $window = Gtk2::Window->new;
16 my $scrollbar = Gtk2::VScrollbar->new;
17 my $hbox = Gtk2::HBox->new;
18 my $terminal = Gnome2::Vte::Terminal->new;
19
20 # set up scrolling
21 $scrollbar->set_adjustment ($terminal->get_adjustment);
22
23 # lay 'em out
24 $window->add ($hbox);
25 $hbox->pack_start ($terminal, TRUE, TRUE, 0);
26 $hbox->pack_start ($scrollbar, FALSE, FALSE, 0);
27 $window->show_all;
28
29 # hook 'em up
30 $terminal->fork_command ('/bin/bash', ['bash', '-login'], undef,
31 '/tmp', FALSE, FALSE, FALSE);
32 $terminal->signal_connect (child_exited => sub { Gtk2->main_quit });
33 $window->signal_connect (delete_event =>
34 sub { Gtk2->main_quit; FALSE });
35
36 # turn 'em loose
37 Gtk2->main;
38
40 This module allows a Perl developer to use the Virtual Terminal
41 Emulator library (libvte for short).
42
44 Gnome2::Vte::index(3pm), Gtk2(3pm), Gtk2::api(3pm) and
45 <http://developer.gnome.org/doc/API/2.0/vte/>.
46
48 Torsten Schoenfeld <kaffeetisch at gmx dot de>
49
51 Copyright (C) 2003-2006 by the gtk2-perl team
52
53
54
55perl v5.28.0 2013-08-24 Vte(3)