#!/opt/iw/iw-home/iw-perl/bin/iwperl
#/pkg/perl/bin/perl
#
use CGI qw(:standard);
use CGI::Carp qw(warningsToBrowser fatalsToBrowser);

#######################################################
# get careers hashes
#do "/iwmnt/default/main/qualcomm/WORKAREA/qualcomm_wa/cgi/careers_hash.pl";
do "./careers_hash.pl";
#######################################################
#$debug = 1;
my $siteroot = url( -base => 1 );
my $expiry = '+1y';                # change expiry to +1y after testing
my $domain = 'qualcomm.com';
my $noinjection = '';

if ($siteroot =~ /iwqctprd1/) {
#	$siteroot = 'http://teamsite.qualcomm.com';
	$siteroot = 'http://iwqctprd1.qualcomm.com';
	$noinjection = '/iw-mount/default/main/qualcomm/careers/WORKAREA/careers_wa';
}

my $profCookie = cookie('profile');
my @cooks = split(/&/,$profCookie);

foreach $cook (@cooks){
	($name, $value) = split(/=/,$cook);
	$$name = $value; #assigns scalars with name value like $loc instead of $name
}

$segment = param('segment') if defined param('segment');
$loc = param('loc') if defined param('loc');
$cc = param('cc') if defined param('cc');
$coll = param('coll') if defined param('coll');

my $cookieString = "loc=$loc&cc=$cc&coll=$coll&segment=$segment";

my $profileCookie = cookie(
    -name    => 'profile',
    -value   => $cookieString,
    -expires => $expiry,
    -domain  => $domain
);

print header(-cookie => $profileCookie);

if( $debug ){
	print "Location: " . $countries{$loc}[0] . "\nSegment: $segment\nCollege: " . $schools{$coll}[0] . "\nCategory: $category";
}else{
	if ( $segment eq 'pro' ) {
		print "<script>\n<!--\nwindow.location.replace(\"" . $siteroot . $noinjection ."/careers/pro/" . $countries{$loc}[0] . "/\");\n//-->\n</script>";
	}
	elsif ( ( $segment eq 'intern' ) or ( $segment eq 'newgrad' ) ) {
		print "<script>\n<!--\nwindow.location.replace(\"" . $siteroot . $noinjection ."/careers/$segment/" . $schools{$coll}[0] . "/\");\n//-->\n</script>";
	}
	else {
		print "<script>\n<!--\nwindow.location.replace(\"" . $siteroot . $noinjection ."/careers/error.html\");\n//-->\n</script>";
	}
}
exit(0);