---
name: "IO::Pager::Unbuffered"
section: "3pm"
platform: "linux"
package: "perl-io-pager"
version: "2.10-6"
release: "Arch Linux 2026-11-01"
platforms: ["linux"]
url: "https://new.carta.tech/IO::Pager::Unbuffered"
---

# IO::Pager::Unbuffered(3pm)

Pipe output to PAGER if destination is a TTY

## NAME

IO::Pager::Unbuffered - Pipe output to PAGER if destination is a TTY

## SYNOPSIS

```
  use IO::Pager::Unbuffered;
  {
    local $STDOUT = IO::Pager::Unbuffered::open *STDOUT;
    print <<"  HEREDOC" ;
    ...
    A bunch of text later
    HEREDOC
  }
  {
    # You can also use scalar filehandles...
    my $token = IO::Pager::Unbuffered::open($FH) or warn($!);
    print $FH "No globs or barewords for us thanks!\n" while 1;
  }
  {
    # ...or an object interface
    my $token = new IO::Pager::Unbuffered;
    $token->print("OO shiny...\n") while 1;
  }
```

## DESCRIPTION

IO::Pager subclasses are designed to programmatically decide whether or not to pipe a filehandle's output to a program specified in *PAGER*; determined and set by IO::Pager at runtime if not yet defined.

See IO::Pager for method details.

## METHODS

All methods are inherited from IO::Pager; except for instantiation.

## CAVEATS

You probably want to do something with SIGPIPE eg;

```
  eval {
    local $SIG{PIPE} = sub { die };
    local $STDOUT = IO::Pager::open(*STDOUT);
    while (1) {
      # Do something
    }
  }
  # Do something else
```

## SEE ALSO

IO::Pager, IO::Pager::Buffered, IO::Pager::Page,

## AUTHOR

Jerrad Pierce \<jpierce@cpan.org\>

Florent Angly \<florent.angly@gmail.com\>

This module was inspired by Monte Mitzelfelt's IO::Page 0.02

Significant proddage provided by Tye McQueen.

## COPYRIGHT AND LICENSE

Copyright (C) 2003-2018 Jerrad Pierce

- •

  Thou shalt not claim ownership of unmodified materials.

- •

  Thou shalt not claim whole ownership of modified materials.

- •

  Thou shalt grant the indemnity of the provider of materials.

- •

  Thou shalt use and dispense freely without other restrictions.

Or, if you prefer:

This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself, either Perl version 5.0 or, at your option, any later version of Perl 5 you may have available.