Just came home from a night out and simply had to say

#!/usr/bin/perl

if ( $God->isa( "DJ" ) ) {

  $God = "Tersefia";

}
[download]