Greetings monks! After playing with some flames and shoop, I was wanting to do some post processing to the mpeg's that shoop creates, but due to a 'magical header' it causes most editing programs to choke on it, so I borrowed this code from the flam3 mailing list. Only problem is, when it attempts to syswrite I get: 
Broke: Not enough space
It works if I print to a normal filehandle, but I'm wanting to pipe the output to another program. 
#!/usr/bin/perl -w

use strict;
use File::Spec;

my $cwd;
my $dir;

my $fname;
my $buffer;
my @stats;

chomp ($cwd = `cd`);

# read and use directory
$dir = <>;
chomp $dir;
$dir =~ s/\r//;

# read sheep
while ($fname = <>) {
    # remove trailing newline
    chomp $fname;
    # remove trailing CR (windows only)
    $fname =~ s/\r//;

    $fname = File::Spec->catfile($cwd, $fname) or die "Can't cat: $!\n
+";
    @stats = stat ($fname) or die "Can't stat $fname $!\n";

    open(INFILE,"< $fname") or die "Can't open $fname $!\n";
    binmode INFILE;
    read(INFILE, $buffer, $stats[7]) or die "Broke: $!\n";
    close INFILE;

    $buffer =~ s/(.====magic-header====.*$)//s;
#    open(OUTFILE,">outfile.mpg") or die "Broke: $!\n";
#    syswrite(OUTFILE, $buffer) or die "Broke: $!\n";
    syswrite(STDOUT, $buffer) or die "Broke: $!\n";
#    close(OUTFILE);
}

[download]

In reply to syswrite and STDOUT by OverlordQ

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.