oyvholm

Perl

bastard

# xmlstrip
# File ID: 06bf7352-5d4a-11df-b044-90e6ba3022ac
# Remove everything inside and outside XML elements, in other words, 
# clean up the bastard.

use warnings;

Shell

fuck

#=======================================================================
# gfuck
# File ID: aebb39d4-5d3a-11df-8eb3-90e6ba3022ac
# gfuck — gnumeric fuck. Det er så forbanna irriterende at den skal 
# drive og lagre fila i gzippa format, så det her scriptet pakker den 
# ut.
#=======================================================================

Perl

fucking

if (open(PipeFP, "svn info|")) {
    while(<PipeFP>) {
        # FIXME: Pussyble i18n stuff fucking up grepping here
        if (/^Revision: (\d+)$/) {
            $Revnum = $1;
            last;

Perl

damn

# Change file modification time from odd to even seconds because some 
# file systems are too damn stupid to cope with them. Used to get rid of 
# differences between timestamps of files in *NIX filesystems and DOSish

Perl

damn

Change file modification time from odd to even seconds because some file 
systems are too damn stupid to cope with them. Used to get rid of 
differences between timestamps of files in *NIX filesystems and DOSish

Shell

fuck

# File ID: aebb39d4-5d3a-11df-8eb3-90e6ba3022ac
# gfuck — gnumeric fuck. Det er så forbanna irriterende at den skal 
# drive og lagre fila i gzippa format, så det her scriptet pakker den