小编Jag*_*mal的帖子

我想从Java方法返回两个对象,并想知道这样做的好方法是什么？

我能想到的可能的方法是:返回HashMap(因为这两个对象是相关的),或者返回ArrayList的Object对象.

更确切地说,我想要返回的两个对象是(a)List对象和(b)逗号分隔的对象.

我想从一个方法返回这两个对象,因为我不想遍历对象列表以获取逗号分隔的名称(我可以在此方法的同一循环中执行).

不知何故,返回a HashMap看起来并不是一种非常优雅的方式.

连接String对象列表的最佳方法是什么？我想这样做:

List<String> sList = new ArrayList<String>();

// add elements

if (sList != null)
{
    String listString = sList.toString();
    listString = listString.subString(1, listString.length() - 1);
}

我不知何故发现这比使用StringBuilder/StringBuffer方法更整洁.

有什么想法/意见吗？

有没有办法使用常量作为哈希键？

例如:

use constant X => 1;

my %x = (X => 'X');

上面的代码将创建一个散列,其中"X"作为键而不是1作为键.然而,我想使用常数X的值作为关键.

如果我在表格中有这样的数据

id   data
--   ----
1    1
1    2
1    3
2    4
2    5
3    6
3    4

如何在查询中(在sybase服务器上)获得这样的结果？

id   data
--   ----
1    1, 2, 3
2    4, 5
3    6, 4

你能为perl建议一些好的MVC框架 - 我所知道的是催化剂

需要能够在perl基础结构上公开服务,这些服务可以由Java/.Net应用程序无缝地调用.

如何将10乘以一个Integer对象并取回该Integer对象？

我正在寻找最好的方法.

我可能会这样做:从Integer对象获取int ,将其与另一个int相乘,并使用此int值创建另一个Integer对象.

代码将类似于......

integerObj = new Integer(integerObj.intValue() * 10);

但是,我看到了一个代码,作者正在这样做:String从Integer对象中获取,在结尾处连接"0",然后Integer通过使用返回对象Integer.parseInt

代码是这样的:

String s = integerObj + "0";
integerObj = Integer.parseInt(s);

这样做有什么好处吗？

在这种情况下,一般来说最有效/最好的方法是什么？

有人可以为Perl建议一些好的自动化测试套件框架吗？

我所知道的是Perl :: Critic

到目前为止,我的谷歌搜索没有导致多次尝试的结果.:-(

有没有人在这里有任何建议？

任何根据我们的编码标准配置Perl :: Critic并在代码库上运行它的资源将不胜感激.

我的问题是::

从像"/usr/folder1/folder2/filename.ext"这样的字符串

• 我必须提取文件名仅用于显示(仅限filename.ext).
  • 我的问题是我应该怎么做？拆分"/"并取最后一个元素是一种方式,但对我来说并不好闻.
• 我必须创建一个超链接,使用该文件的URI作为目标.这将类似于file://domain.com/usr/folder1/folder2/filename.ext

我查看了java.net中的URI和URL接口,但在那里找不到任何有用的东西.

此外,在某些情况下,我的文件路径可以有COMMA,SPACE等(Windows文件夹).因此,在提出任何想法时请记住这一点.

我有一个带有可能的命令行参数的字符串(使用Read-Eval-Print-Loop程序),我希望它在传递给Getopt :: Long时被解析为类似于命令行参数.

详细说明:

我有一个字符串

$str = '--infile /tmp/infile_location --outfile /tmp/outfile'

我希望它被GetOptions解析,以便我更容易添加新选项.

我能想到的一个解决方法是将字符串拆分为空格,并用新数组替换@ARGV,然后调用GetOptions.就像是 ...

my @arg_arr = split (/\s/, $input_line);

# This is done so that GetOptions reads these new arguments
@ARGV = @arg_arr;
print "ARGV is : @ARGV\n";
GetOptions (
            'infile=s'  => \$infile,
            'outfile=s' => \$outfile
           );

有没有好/更好的方法？