?? makeobjectgenerator.pm
字號(hào):
package MakeObjectGenerator;# ************************************************************# Description : Generates object files for generic Makefiles.# Author : Chad Elliott# Create Date : 5/23/2003# ************************************************************# ************************************************************# Pragmas# ************************************************************use strict;use ObjectGenerator;use vars qw(@ISA);@ISA = qw(ObjectGenerator);# ************************************************************# Subroutine Section# ************************************************************sub process { my($noext) = $_[1]; my(@objects) = (); my(@exts) = ('o'); my(@dirs) = (defined $ENV{VDIR} ? $ENV{VDIR} : ''); $noext =~ s/\.[^\.]+$//o; if (defined $ENV{SOEXT}) { push(@exts, $ENV{SOEXT}); } if (defined $ENV{VSHDIR}) { push(@dirs, $ENV{VSHDIR}); } foreach my $dirs (@dirs) { foreach my $ext (@exts) { push(@objects, "$dirs$noext.$ext"); } } return \@objects;}1;
?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -