Return Styles: Pseud0ch, Terminal, Valhalla, NES, Geocities, Blue Moon. Entire thread

<> operator

Name: Anonymous 2007-07-14 8:37 ID:DWRQwZU8

discuss

Name: Anonymous 2007-07-16 4:12 ID:UKB+M8DG

>>27
Fine, then don't use it.
foreach $file (@ARGV) {
    open(VAGINA, $file) || die("$file: $!\n");
    while (!eof(VAGINA)) {
        $_ = readline(VAGINA);
        # manipulate $_
    }
    close(VAGINA);
}

Name: Anonymous 2007-07-16 5:02 ID:Heaven

>>28
fail

foreach $file (@ARGV) {
        die $! unless open(VAGINA, $file);
        print readline(VAGINA) until eof(VAGINA);
        close(VAGINA);
}


and i don't even know perl.

Name: Anonymous 2007-07-16 5:03 ID:Heaven

>>29
a bit smaller

foreach $file (@ARGV) {
        die $! unless open(VAGINA, $file);
        print readline(VAGINA) until eof(VAGINA) and close(VAGINA);
}

Newer Posts
Don't change these.
Name: Email:
Entire Thread Thread List