DB<111> $path='/tmp/path'
 => "/tmp/path"

  DB<112> open $handle{$path},">",$path;
 => 1

  DB<113> $handle{$path}->print("This is File $path")
 => 1

  DB<114> close $handle{$path}
 => 1

  DB<115> `cat $path`
 => "This is File /tmp/path"