Help for this page

Select Code to Download


  1. or download this
    package Tie::NameThis;
    use Tie::File;
    ...
    sub DESTROY { }
    
    'Why oh why did I actually code this?'
    
  2. or download this
    use strict;
    tie my %hash, 'Tie::NameThis', 'myupdowntimes.dat';
    # Now, assign to or access $hash{machine}{UP} and $hash{machine}{DOWN}