#include <saga/saga.hpp>

int main ()
{
  try 
  {
    saga::session s;
    saga::context c ("ssh");

//     c.set_defaults ();    // has been removed as of newest SAGA spec
    s.add_context  (c);

    saga::filesystem::directory d1 (s, "ssh://amerzky@is.cct.lsu.edu/home/merzky/");

    std::cout << "d1: " << d1.get_url () << "\n";

    saga::filesystem::directory d2 = d1.open_dir ("perl",
                                                 saga::filesystem::Read);

    std::cout << "d2: " << d2.get_url () << "\n";

    saga::filesystem::file f = d2.open ("HTTP-Proxy-0.23.tar.gz",
                                        saga::filesystem::Read);

    size_t size = f.get_size ();

    std::cout << f.get_url () << " : " << size << "\n";
  }
  catch ( const saga::exception & e )
  {
    std::cerr << e.what ();
  }
}