DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software.

top - metrics - download

⟦17d5c8219⟧ TextFile

    Length: 229 (0xe5)
    Types: TextFile
    Names: »suckline.pl«

Derivation

└─⟦4f9d7c866⟧ Bits:30007245 EUUGD6: Sikkerheds distributionen
    └─⟦3da311d67⟧ »./cops/1.04/cops_104.tar.Z« 
        └─⟦6a2577110⟧ 
└─⟦4f9d7c866⟧ Bits:30007245 EUUGD6: Sikkerheds distributionen
    └─⟦6a2577110⟧ »./cops/1.04/cops_104.tar« 
            └─⟦this⟧ »cops_104/perl/suckline.pl«

TextFile

#
#  As title implies... :-)
#
sub main'suckline {
    local($file, $_) = @_;
#   local($package) = caller;

#   $file =~ s/^([^']+)$/$package'$1/; 
    {
	if (s/\\\n?$//) {
	    $_ .= <$file>;
	    redo;
	}
    } 
    $_;
}

1;