Current Path : /proc/2/cwd/proc/3/root/proc/3/root/scripts/ |
Current File : //proc/2/cwd/proc/3/root/proc/3/root/scripts/safeup2date |
#!/usr/local/cpanel/3rdparty/bin/perl # cpanel - safeup2date Copyright 2009 cPanel, Inc. # All rights Reserved. # copyright@cpanel.net http://cpanel.net # This code is subject to the cPanel license. Unauthorized copying is prohibited use strict; open( UPTODATE, '-|' ) || exec( 'up2date', @ARGV ); my $inerr = 0; while (<UPTODATE>) { if (m/packages.*not.*found/) { $inerr = 1; } if ( !$inerr ) { print; } if (m/^$/) { $inerr = 0; } } close(UPTODATE);