On 10/12/2011 02:56 AM, Andreas Gruenbacher wrote:
>
>> As for removing the temp file, I just found it was the easiest way to
>> pipe into gpg. If there's a better way to do that, I'm all ears.
>
> ... how about this approach?
>
> my @lines = <>;
> map { print } @lines;
> print "\n";
>
> #-----------------------------------------------
>
> sub crlf($) {
> my $_ = shift;
> #s/\n$/\r\n/;
> s/^/> /;
> return $_;
> }
>
> my $command = 'tr a-z A-Z';
> open(PIPE, "| $command")
open(PIPE, '|-', $command);
... please; better yet with a list (@command) so it doesn't doesn't pass
through the shell.
-hpa
_______________________________________________
Quilt-dev mailing list
[email protected]
https://lists.nongnu.org/mailman/listinfo/quilt-dev