use WWW::Mechanize;
$agent = WWW::Mechanize->new( cookie_jar => {} );
  $agent->post('http://www.kleiderkreisel.de/photo/ajax_photo_action',
    [
        "Filedata" => ['mypic.gif' => 'C:\Pics\mypic.gif'],
        'session' => '92384729384792384729384729384',
        'method' => 'put'
    ]);