January 2009 Archives

The curs_set routine sets the cursor state is set to invisible, normal, or very visible for visibility equal to 0, 1,  or 2 respectively.  If the terminal supports the visibility requested, the previous cursor state is returned; otherwise, ERR is returned.

1. sudo su (or however you become super user)
   
2. apt-get install hwinfo
3. hwinfo --framebuffer | less (find the hexcode for the resolution you want)
4. emacs /boot/grub/menu.lst
   
5. add the option 'vga=(hexcode)' to your default kernel entry.
6. restart the computer and log back into a virtual console.

• Term::ReadKey. Allows you to set terminal modes, sizes, and other attributes. Allows you to do nifty things like single-character, non-blocking, and non-echoing input. Does not provide as much functionality as curses, but is simpler to use and more portable.
• Term::ANSIColor. Allows you to output colored text to a terminal, without having to know the escape codes. This gem is one of the core modules!

void chomp(char * str) {
  if(*str != '\0') {
    while(1) {
      str++;
      if(*str == '\0') {
        str--;
        if(*str == '\n') {
          *str = '\0';
          break;
        }
        else { str++; }
      }
    }
  }
}

#!/usr/bin/env perl
use strict
use warnings

MyPkg::var2 = 'abc'; # assigns value to $var2 in MyPkg
MyPkg::do_this(); # runs sub do_this from MyPkg

Package MyPkg;
{ #  extra brackets needed to keep scope of $var1, etc. inside of MyPkg

our $var1; # our assigns name $var1 to $MyPkg::var1
our $var2; # and allows subs in MyPkg to use $var1 instead of $MyPkg::var1
our $var3;

sub do_this() {
    print $var2; # didn't have to use $MyPkg::var2, just $var2
    (do something else with $var1, $var3)
}

}

package Hello;
{
our $greeting = "hi";
sub greet_someone { print "$greeting\n" }
}

package Hello;
INIT {
our $greeting = "hi";
sub greet_someone { print $greeting\n" }
}

• Hello hot stuff... what can I do for you?
• M' Lord? What is your wish?
• Yeah, yeah... whadda ya want already?
  

This is a small project I'm working on for making audio files available on the web, indexed by date. I'm currently implementing this on a church website, to make their audio sermon recordings easily accessible.