use Class::HPLOO ;

class User extends HDB::Object {

  use HDB::Object ;

  attr( user , pass , name , int age , int create_time ) ;
  
  sub User( $user , $pass , $name , $age ) {
    $this->{user} = $user ;
    $this->{pass} = $pass ;
    $this->{name} = $name ;
    $this->{age}  = $age ;
    $this->{create_time} = time ;
  }

}