'perl' Category

  • Book Review: Catalyst, Accelerating Perl Web Application Development

    April 11, 2008

    Recently I was contacted by a publisher from Packt publishing about reviewing a couple of books, after a long time (sorry I took so long!) I’m finally finished with my review of the first book, Catalyst: Accelerating Perl Web Application Development. Note that while I was asked, I wasn’t paid for this review, this is […]

  • Fix for being unable to bootstrap fink on Leopard

    November 13, 2007

    If you run into the following error trying to bootstrap fink (I was using version 0.27.8) on Leopard: ./Command/failure………………….ok 1/0 ./Command/failure………………….NOK 24/0# Failed test at ./Command/failure.t line 85. # ” # != # ‘0’ ./Command/failure………………….ok 41/0# Looks like you failed 1 test of 49. ./Command/failure………………….dubious Test returned status 1 (wstat 256, 0x100) DIED. FAILED test […]

  • PHFOS/CIOSim in 3 languages

    November 5, 2007

    I’ve spent the last week or so writing a customer emulation script for the QA group here to test some of our archiving products. If you’re unfamiliar with PHFOS/CIOSim, take a look here. In short, PHFOS/CIOSim is a small multi-threaded program that randomly selects files in a given directory to open and hold open. I […]

  • Why PHFOS dies if you don’t use –readstop

    November 1, 2007

    Thanks to Jon for pointing this out to me, we’re pretty sure that the reason perl chokes and gives you a bus error (on OSX) when you run PHFOS [script] like this: ./phfos.pl -d <dir> -r -v –min=2 –max=3 -n 1000 We’re actually guessing that after allocating too many threads, since we aren’t immediately exiting […]

  • PHFOS update – more than 20 threads useable

    October 29, 2007

    [UPDATE 10/30/07]: In the below post, use the link to the text file to get the latest version, I can’t edit the actual text on the page every time I update the script. The most up-to-date script can be found here. Just a small update, you *can* actually use more than ~20 threads when using […]

  • PHFOS – Perl Hold File Open Script for stressing disk access like a customer environment

    October 25, 2007

    [UPDATE 10/29/07]: You can now use phfos with lots more threads, read this post It’s quick, it’s dirty, but here it is “PHFOS” (Note to self: get better at naming scripts). So here’s what it does. Basically, you specify a directory with some kind of files in it, the script then spawns <n> threads that […]

  • Not-as-simple perl script for ZFS snapshot auditing

    June 5, 2007

    Hi everyone, I’m back again with another perl script to hopefully be useful to a few of you. Firstly, the script: http://lee.hinmanphoto.com/files/zdiff.txt (formatting long scripts in wordpress’ crazy editor is a very long and arduous process, thus I’m just linking to the script in this case, if anyone knows of a better place to stick […]

  • Super-simple perl script for zfs snapshots

    June 1, 2007

    Here’s a simple script for creating daily zfs snapshots that get rotated every week (so you always have one for Mon, Tues, Wed, etc) #!/usr/bin/perl use warnings; use strict; my $zfsname = shift || die “Need a filesystem name\n”; my $day = `date`; $day =~ s/(Sun|Mon|Tue|Wed|Thu|Fri|Sat)[\S\s]+/$1/gi; my $snapname = “$zfsname\@$day”; my $exist = system(“zfs list […]

 
Powered by Wordpress and MySQL. Theme by Shlomi Noach, openark.org