use v6;

=begin pod

=TITLE Test whether program is interactive or not

=AUTHOR stmuk

Test whether program is interactive or not
running from terminal or in batch mode (like cron on UNIX)

=end pod

sub I-am-interactive {
    return  $*IN.t && -t $*OUT.t;
}

# vim: expandtab shiftwidth=4 ft=perl6

use v6;

=begin pod

=TITLE Test whether program is interactive or not

=AUTHOR stmuk

Test whether program is interactive or not
running from terminal or in batch mode (like cron on UNIX)

=end pod

sub I-am-interactive {
    return  $*IN.t && $*OUT.t;
}

# vim: expandtab shiftwidth=4 ft=perl6

Remove -t flag in interactive test program
Remove -t flag in interactive test program

This is seems to no longer be necessary since it causes Rakudo to barf and
it doesn't turn up in the docs, specs or tests anymore.
