Time::Local module is also a useful thing. You can convert timestamps to UNIX timeformat (yes the big number) with the timelocal() function, and substract timestamp2 from timestamp1.

-- tune