我有这个正则表达式,我将OS名称与VMX文件中的一行进行比较.它最初是作为单独的elsif
声明开始的,但最终我制作了一个单一的if
声明.无论如何,这是代码; 我试图找到一种方法来使代码更清洁,但它将每个匹配放在一个单独的行上; 它不再有效.
elsif ($vmx_file =~ m/guestOSAltName\s+=\s"Microsoft\sWindows\sServer\s2003,Web\sEdition"|"Microsoft\sWindows\sSmall\sBusiness\sServer\s2003"|"Microsoft\sWindows\s2000\sAdvanced\sServer"|"Microsoft\sWindows\s2000\sServer"|"Microsoft\sWindows\s2000\sProfessional"|"Microsoft\sWindows\s98"|"Microsoft\sWindows\s95"|"Microsoft\sWindows\sNT\s4"/) {
$virtual_machines{$vm}{"Architecture"} = "32-bit";
Run Code Online (Sandbox Code Playgroud)
根据建议更新了代码,
elsif ($vmx_file =~ m/guestOSAltName\s+=\s"Microsoft\sWindows\sServer\s2003,Web\sEdition|Small\sBusiness\sServer\s2003|"2000\sAdvanced\sServer|2000\sServer|2000\sProfessional|98|95|NT\s4/) {
$virtual_machines{$vm}{"Architecture"} = "32-bit";
Run Code Online (Sandbox Code Playgroud) 我想我今天会尝试启动一个Minecraft mod.我打算使用枚举类来存储我的版本和modid之类的东西.
public enum Reference {
MODID("farming"),
VERSION("1.8.0-0.0.1");
private String value;
Reference(String string) {
String value = string;
}
@Override
public String toString() {
return value;
}
}
Run Code Online (Sandbox Code Playgroud)
对toString
方法的覆盖是一个不起作用的想法.它仍然抱怨它想要一个字符串,但我返回Reference
这是一个不兼容的类型,因为它想要一个String
.
这是主要课程的其余部分.
import net.minecraftforge.fml.common.Mod;
import net.minecraftforge.fml.common.Mod.EventHandler;
import net.minecraftforge.fml.common.event.FMLInitializationEvent;
@Mod(modid = Reference.MODID , version = Reference.VERSION)
public class FarmingMod
{
@EventHandler
public void init(FMLInitializationEvent event) {
}
}
Run Code Online (Sandbox Code Playgroud)
我想弄清楚的部分是注释@Mod
.我看了一下注释的代码.它说它只接受一个字符串.
我没有包裹我的脑袋是我的枚举类不兼容.我在每个枚举中返回一个字符串.
问题可能是什么?
如何将数组哈希转储到文件中?
每个哈希键都是文件夹的名称,数组是文件夹中列出的所有文件.
这是我正在做的,
open OUTFILE, "> output.txt" or die $!;
foreach my $key (keys %folder_structure) {
print OUTFILE "$key\n";
foreach my $line (@{$folder_structure{$key}}) {
print OUTFILE "$line\n";
}
}
close OUTFILE;
Run Code Online (Sandbox Code Playgroud) 我很好奇,如果我正在寻找Perl的"升级",那就是难度.我要去哪儿?
蟒蛇更高?红宝石?Java的?
我变暖了吗?
将GUI添加到我的perl脚本会有更高的难度吗?
我喜欢Perl,但是我希望能够进行一些分析并尝试其他方法.