![[BACK]](/icons/back.gif){kind=icon}
Return to loncnew CVS log ![[TXT]](/icons/text.gif){kind=icon}
![[DIR]](/icons/dir.gif){kind=icon}
Up to [LON-CAPA] / loncom|
Return to loncnew CVS log | Up to [LON-CAPA] / loncom |
| version 1.100, 2011/06/17 17:41:37 | version 1.100.10.2, 2020/01/12 01:55:44 |
|---|---|
| Line 2233 sub Terminate { | Line 2233 sub Terminate { |
| } | } |
| sub my_hostname { | sub my_hostname { |
| use Sys::Hostname; | use Sys::Hostname::FQDN(); |
| my $name = &hostname(); | my $name = Sys::Hostname::FQDN::fqdn(); |
| &Debug(9,"Name is $name"); | &Debug(9,"Name is $name"); |
| return $name; | return $name; |
| } | } |