![]() Hospice inpatient utilization in Taiwan was indeed more sensitive to the emerging epidemic than general inpatient utilization. Gender, age and diagnosis distributions did not differ. In total, 566 patients were admitted to hospice wards in May/June 2003, in contrast to 818 in May/June 2002. 19.9% in May 2003) and a slower recovery with a three-month lag. Hospices showed a more marked reduction in utilization than all hospital beds ( e.g. In 2003, hospice utilization began to decrease in the middle of April, reached a minimum on 25 May, and gradually recovered to the level of the previous November. Only 15 hospice wards operated throughout the whole of 20. The comparisons were extended to total hospital bed utilization and to patients who were still admitted to hospice wards during the peak period of the SARS epidemic. Hospice analyses were limited to those wards that offered inpatient services throughout these two years. Before-and-after comparisons of daily and monthly utilizations were made. The data sources were the complete datasets of inpatient admissions during 20 from the National Health Insurance Research Database. The aim of the present study was to describe changes in hospice inpatient utilization during and after the SARS epidemic in 2003 in Taiwan. Many subsequent papers have addressed its impact on health service utilization, but few have considered palliative (hospice) care. The severe acute respiratory syndrome (SARS) epidemic threw the world into turmoil during the first half of 2003. Hmm - no idea (as I said, I ran into this on Solaris - and didn't have that problem).ĭepending on what your script is doing and whether it needs access to the TS perl modules - you could have your script use AS perl explicitly - even when called from within TS and/or you could try adding the TS perl modules to the path. 'make' is not recognized as an internal or external command, If you have problems building this extension.Ĭ:\perlfiles\Archive-Zip-1.20>make install Your perl and your Config.pm seem to have different ideas about the Have \iw-home\iw-perl\lib\Config.pm expected C:\PROGRA~1\INTERW~1\TeamSite\iw. I tried upgrading the ARCGIVE ZIP module but got following errors. ![]() You are rite i have tried the latter approach ie from command prompt i m using ActivePerl and from TS i m using iwperl. Not sure if any of that helps, but hopefully some part of it does. For this reason, it may be better to call read separately.or perhaps improve the code to check for it. )Īlso - looking at the perldoc for my version of Archive::Zip on my laptop (not TS) - I see the following note: If a filename argument is passed and the read fails for any reason, new will return undef. I seem to recall that when I first used 6.5 I had to download a newer version of Archive::Zip from CPAN (this was on Solaris, but. Use Archive::Zip above the lines you showed? When you run it from the command line - are you running it with iwperl or perl (there could be a different version of Perl on your system) pl file from command prompt its running perfect. I would like to add that when i am running this script from a separate. Its giving error for this line of code :foreach my $member ($zip->members) $member->extractToFileNamed("$destinationPath/$extractName") Ĭan't call method "members" on an undefined value. (my $extractName = $member->fileName) =~ s My $zip = Archive::Zip->new($targetPath) I am executing my code from a ipl file which is called when user triggers a button from TS. I am using TeamSite 6.5.0 Service Pack 2.
0 Comments
Leave a Reply. |