http://book.flypeach.com/WebService/B2cService.asmx/GetLowFareFinderMonth

POST /WebService/B2cService.asmx/GetLowFareFinderMonth HTTP/1.1
Host: book.flypeach.com
User-Agent: Mozilla/5.0 (Windows NT 6.1; WOW64; rv:37.0) Gecko/20100101 Firefox/37.0
Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
Accept-Language: en-US,en;q=0.5
Accept-Encoding: gzip, deflate
Content-Type: application/json; charset=utf-8
Referer: http://book.flypeach.com/default.aspx?langculture=en-US&ao=B2CENUS
Content-Length: 296
Cookie: __utma=134592366.821879741.1427710303.1428247408.1428251315.9; __utmz=134592366.1427710303.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); _ga=GA1.2.821879741.1427710303; SERVERID=book6; ASP.NET_SessionId=ciq5gzqapgonocmls3oghw45; __utmc=134592366; __utmb=134592366.1.10.1428251315; __utmt=1
Connection: keep-alive
Pragma: no-cache
Cache-Control: no-cache
{"strFromAirport":"KIX","strToAirport":"HKG","departMonth":"20150606","returnMonth":"20150606","iOneWay":"true","iAdult":2,"iChild":0,"iInfant":0,"BoardingClass":"","CurrencyCode":"JPY","strPromoCode":"","SearchType":"FARE","iOther":0,"otherType":"","strIpAddress":"","strCurrentDate":"20150406"}
HTTP/1.1 200 OK
##</code><code>##

{"strFromAirport":"KIX","strToAirport":"HKG","departMonth":"20150606","returnMonth":"20150606","iOneWay":"true","iAdult":2,"iChild":0,"iInfant":0,"BoardingClass":"","CurrencyCode":"JPY","strPromoCode":"","SearchType":"FARE","iOther":0,"otherType":"","strIpAddress":"","strCurrentDate":"20150406"}

##</code><code>##

#!/bin/usr/perl
#
use warnings;
use strict;

use WWW::Mechanize::Firefox;
  my $mech = WWW::Mechanize::Firefox->new(
        tab => 'current',
          );

  $mech->post('http://book.flypeach.com/WebService/B2cService.asmx/SearchLowFareSingleMonth');


  my $retries = 10;
    while ($retries-- and ! $mech->is_visible( xpath => '//*[@id="dvAvailabilitySearch"]' )) {
              sleep 1;
                  };
      die "Timeout" if 0 > $retries;

                              # Now the element exists
                              #$mech->click({xpath => '//*[@id="ctl00_dvOutwardResult"]'});

print $mech->content;