Help for this page

Select Code to Download


  1. or download this
    #!/usr/bin/perl
use LWP::UserAgent;
...
$lwp->default_header(Authorization => 'Basic XXXXXX');
$lwp->post('http://api.foursqure.com/v1/checkin', {vid=>$ARGV[0],priva
+te=>0,
geolat=>$lt,geolong=>$lg});
  2. or download this
    #!/usr/bin/perl
use LWP::UserAgent;
...
    }
);