Completed

Write some Software

This project was successfully completed by kuzmichmurom for $15 USD in a day.

Get free quotes for a project like this
Employer working
Project Budget
$10 - $30 USD
Completed In
1 day
Total Bids
2
Project Description

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]") ;

#}

Looking to make some money?

  • Set your budget and the timeframe
  • Outline your proposal
  • Get paid for your work

Hire Freelancers who also bid on this project

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