ovh/the-bastion
1
1
Fork 0
mirror of https://github.com/ovh/the-bastion.git synced 2025-09-06 21:14:15 +08:00
Code Issues Projects Releases Packages Wiki Activity

fix: batch: don't attempt to read if stdin is closed

Browse source
This commit is contained in:
Stéphane Lesimple 2022-09-12 18:49:29 +00:00 • committed by Stéphane Lesimple
parent b7f4909310
commit 720222c423
1 changed files with 4 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

5
bin/plugin/open/batch
View file

@ -2,6 +2,8 @@
# vim: set filetype=perl ts=4 sw=4 sts=4 et:
use common::sense;
use Scalar::Util qw{ openhandle };
use File::Basename;
use lib dirname(__FILE__) . '/../../../lib/perl';
use OVH::Result;
@ -48,7 +50,8 @@ osh_info "Use 'exit', 'quit' or ^D to stop.";
osh_info "--- waiting for input";
my @ret;
while (my $line = <STDIN>) {
my $line;
while ((openhandle(\*STDIN)) && ($line = <STDIN>)) {
chomp $line;
last if (lc($line) eq 'exit' || lc($line) eq 'quit');