<html><head><meta name="color-scheme" content="light dark"></head><body><pre style="word-wrap: break-word; white-space: pre-wrap;">#!/usr/bin/perl -w
#
#
use strict;
use CGI::Carp qw(fatalsToBrowser); 

use admin;
baseq::Vars;
	
my $admin = admin-&gt;init;

$admin-&gt;log(4,"Entering:   localisation  admin.pl ");
$admin-&gt;getbearb; 
$admin-&gt;exit;
</pre></body></html>