StackOverflow2013

Note that there are some explanatory texts on larger screens.

plurals

PO
primarykey
Id
1236411
data
AcceptedAnswerId
0
AnswerCount
0
ClosedDate
CommentCount
2
CommunityOwnedDate
CreationDate
2009-08-06T00:26:36.633
FavoriteCount
0
LastActivityDate
2009-08-08T21:26:21.777
LastEditDate
2009-08-08T21:26:21.777
LastEditorUserId
139673
OwnerUserId
139673
ParentId
1236089
PostTypeId
2
Score
1
ViewCount
0
LastEditorDisplayName
text
Body
<p>Here it is with the GTK2 code for displaying the progress bars.</p> <pre><code>#!/usr/bin/perl use strict; use warnings; use Glib qw/TRUE FALSE/; use Gtk2 '-init'; my $window = Gtk2::Window->new('toplevel'); $window->set_resizable(TRUE); $window->set_title("command runner"); my $vbox = Gtk2::VBox->new(FALSE, 5); $vbox->set_border_width(10); $window->add($vbox); $vbox->show; # Create a centering alignment object; my $align = Gtk2::Alignment->new(0.5, 0.5, 0, 0); $vbox->pack_start($align, FALSE, FALSE, 5); $align->show; # Create the Gtk2::ProgressBar and attach it to the window reference. my $pbar = Gtk2::ProgressBar->new; $window->{pbar} = $pbar; $align->add($pbar); $pbar->show; # Add a button to exit the program. my $runbutton = Gtk2::Button->new("Run"); $runbutton->signal_connect_swapped(clicked => \&runCommands, $window); $vbox->pack_start($runbutton, FALSE, FALSE, 0); # This makes it so the button is the default. $runbutton->can_default(TRUE); # This grabs this button to be the default button. Simply hitting the "Enter" # key will cause this button to activate. $runbutton->grab_default; $runbutton->show; # Add a button to exit the program. my $closebutton = Gtk2::Button->new("Close"); $closebutton->signal_connect_swapped(clicked => sub { $_[0]->destroy;Gtk2->main_quit; }, $window); $vbox->pack_start($closebutton, FALSE, FALSE, 0); $closebutton->show; $window->show; Gtk2->main; sub pbar_increment { my ($pbar, $amount) = @_; # Calculate the value of the progress bar using the # value range set in the adjustment object my $new_val = $pbar->get_fraction() + $amount; $new_val = 0.0 if $new_val > 1.0; # Set the new value $pbar->set_fraction($new_val); } sub runCommands { use IO::Select; my $s = IO::Select->new(); for (1..2) { open my $fh, '-|', './test.sh'; $s->add($fh); } while (my @readers = $s->can_read()) { for my $fh (@readers) { if (eof $fh) { $s->remove($fh); next; } my $l = <$fh>; print $l; pbar_increment($pbar, .25) if $l =~ /output/; } } } </code></pre> <p>see <a href="http://gtk2-perl.sourceforge.net/doc/gtk2-perl-tut/sec-ProgressBars.html" rel="nofollow noreferrer">the perl GTK2 docs</a> for more info</p>
Tags
Title
singulars
PostAcceptedAnswerId
1. This table or related slice is empty.
PostParentId
1. POHow can I read the output from external commands in real time in Perl?
  singulars
  PostTypePostTypeId
  PTQuestion
PostTypePostTypeId
1. PTAnswer
UserLastEditorUserId
1. USplastic chris
UserOwnerUserId
1. USplastic chris
plurals
PostLinksPostIdRelatedPostId
1. This table or related slice is empty.
PostLinksRelatedPostIdPostId
1. This table or related slice is empty.
PostsAcceptedAnswerId
1. This table or related slice is empty.
PostsParentIdCreationDate
1. This table or related slice is empty.
VotesPostIdCreationDate
1. VO
  singulars
  PostPostId
  PO
  UserUserId
  This table or related slice is empty.
  VoteTypeVoteTypeId
  VTUpMod
2. VO
  singulars
  PostPostId
  PO
  UserUserId
  This table or related slice is empty.
  VoteTypeVoteTypeId
  VTUpMod
3. VO
  singulars
  PostPostId
  PO
  UserUserId
  This table or related slice is empty.
  VoteTypeVoteTypeId
  VTDownMod
CommentsPostId
1. COOh. My. That's the definition of overkill.
  singulars
  PostPostId
  PO
  UserUserId
  This table or related slice is empty.
2. COLive and learn... one of the better things about SO is that I'm not the smartest person here.
  singulars
  PostPostId
  PO
  UserUserId
  USplastic chris

Querying!

Guidance

A row detail

Detail views are divided into sections. All the information in the data section comes from columns in the selected row. The other sections display data from other, related rows.

Related data can be related in a to-one or a to-many fashion. Captions of data related in a to-many fashion link to a list view showing a filtered view of the table.

Try moving around until you find a non-empty to-many entry and click on the label to get to one. You can move back to the root by clicking on the database name in the header.