Changeset 258


Ignore:
Timestamp:
Apr 20, 2007, 6:27:54 PM (15 years ago)
Author:
Jari Häkkinen
Message:

Changed default server to the demo server, default user to base2.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/se/lu/thep/webservices_clients/test.pl

    r257 r258  
    11#! /usr/bin/perl -w
     2
     3# $Id$
    24
    35use BaseWebService;
     
    1214
    1315# Create the BaseWebService object
    14 my $obj = BaseWebService->new(baseUrl => 'http://base2.thep.lu.se:8080/acgt');
     16my $obj = BaseWebService->new(baseUrl => 'http://base2.thep.lu.se:8080/demo');
    1517my $sessionID = $obj->sessionID();
    1618print "Session ID = $sessionID \n";
    1719
    1820# Login, change to fit your account
    19 $obj->login('login', 'password');
     21#$obj->login('userid', 'password');
     22$obj->login('base2', 'base2');
    2023
    2124# Get all the projects
Note: See TracChangeset for help on using the changeset viewer.