if($val !~ /(.*)<rss version=\"(1|2\.0)\"(.*)/is ) {
                die qq{
                        Not a RSS Feed....Dying here..\n
                };
        }