Выполнено

Write some Software

Этот проект был успешно выполнен kuzmichmurom за $15 USD за день.

Получить бесплатно ценовые предложения для подобного проекта
Работодатель работает
Бюджет проекта
$10 - $30 USD
Выполнено за
1 день
Всего заявок
2
Описание проекта

Need to convert this script of Perl [url removed, login to view] to Perl 5.20. I assume it is a simple job for someone familiar with Perl. Let me know what do you think.

==========

#!/usr/local/bin/perl

use DBForm::Page ;

use DBForm::Form ;

use DBForm::Field ;

$page=DBForm::Page->new(id=>"Caseweb Users",showlocation=>'none',sidebarwidth=>0,sidebar=>'navy');

$dbsource='DBI:mysql:db476633236:[url removed, login to view]' ;

$dbuser='dbo476633236';

$dbpass='*********';

$main=$page->add_form(id=>"Users",dbname=>'case',dbtable=>'t_user',size=>'90%',

dborderby=>'user_id',

#showlocation=>'none',

#showlist=>'yes',

#allowsearch=>'yes',

allowinsert=>0,

allowdelete=>0,

#layout=>'COL',

dbsource=>$dbsource, dbuser=>$dbuser, dbpass=>$dbpass);

$this=$main->add_field(id=>'user_id',size=>15,key=>1,auto=>1,searchable=>1,editable=>0) ;

$this=$main->add_field(id=>'login',size=>15,key=>1,auto=>1,searchable=>1,editable=>0) ;

$dummy=$main->add_field(id=>'first_name',size=>20,editable=>0);

$dummy=$main->add_field(id=>'last_name',size=>20,editable=>0);

$dummy=$main->add_field(id=>'country',size=>20,editable=>0);

#$dummy=$main->add_field(id=>'grupo',size=>8,optselect=>'select id, name from subdomains order by id') ;

#$dummy=$main->add_field(id=>'description',type=>'memo',lines=>5,size=>70) ;

#$dummy=$main->add_field(id=>'folder',size=>32) ;

$dummy=$main->add_field(id=>'journal',optyn=>2) ;

#if ( $main->{usertype} eq 'ADMIN' ) {

$page->print ;

#} else {

# $page->redirect("/[url removed, login to view]") ;

#}

Хотите заработать немного денег?

  • Укажите свой бюджет и срок
  • Опишите свое предложение
  • Получите оплату за свою работу

Нанять фрилансеров, которые также подали заявку в этот проект

    • Forbes
    • The New York Times
    • Time
    • Wall Street Journal
    • Times Online